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.REM € 
IDENTIFICATION 
PRODUCT CODE: AC -T710B8 -MC 
PRODUCT NAME : CZKDMBO KDJ11 CACHE MEMORY DIAGNOSTIC 
PRODUCT DATE: 15-MAR -84 
MAINTAINER: DIAGNOSTIC ENGINEERING 
AUTHORS: HENRY ENMAN, JIM PITTMAN, BARRY IRRGANG 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 


NO RESPONSIBILITY IS ASSUMED FOR THE USE OR RELIABILITY OF 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
AFFILIATED COMPANIES. 


COPYRIGHT (C) 1984 BY DIGITAL EQUIPMENT CORPORATION 
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OCT-83 REV. 
REV. 


FEB -84 
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-REM € 
HISTORY 


FIRST RELEASE 

pg Be may MADE TO: 
CORRECT VECTOR AREA MAINTENANCE PROBLEM 

2 ALLOW leat TO EXECUTE PROPERLY IN APT 
ENVIRONMENT 

3. ALLOW DIAGNOSTIC TO BE EXECUTED IN SYSTEMS WITH 
MXV11-A/B MODULES. REQUIRES DELETION OF TESTS 
WHICH CAUSE KDJ11-A CACHE PARITY ABORTS. 

4. ENSURE THAT CPU ERROR REGISTER IS CLEARED AFTER 
COMPLETION OF TEST THAT MIGHT CAUSE IT TO BE SET. 

S. SAVE PC AND CONTENTS OF R6 ON UNEXPECTED INTERRUPTS 
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85 [REM E 
86 1.0 GENERAL INFORMATION 
88 1.1 PROGRAM ABSTRACT 
90 THIS IS AN APT COMPATIBLE VERSION OF THE KDJ11 CACHE MEMORY 
91 SYSTEM DIAGNOSTIC. IT FOCUSES ON TESTING THE FUNCTIONALITY 
92 OF THE CACHE MEMORY SYSTEM. A SWITCH IS PROVIDED IN THE 
93 SOFTWARE SWITCH REGISTER TO DISABLE 22 BIT ADDRESS GENERATION 
94 IN 18 BIT QBUS SYSTEMS. THIS IS IMPLEMENTED BY SETTING BIT 08 
95 TO A ONE. DEFAULT IS TO TEST 22 BIT ADDRESSES. IN ADDITION; 
% A SWITCH IS PROVIDED TO ENABLE THE EXECUTION OF THE CACHE DATA. 
97 AND CACHE TAG RAM DATA RELIABILITY TESTS. THESE TESTS ARE VERY 
98 LONG AND MAY NOT BE DESIRED IN ALL APPLICATIONS. THESE TESTS 
99 ARE ENABLED BY SETTING BIT 09 IN THE SOFTWARE SWITCH REGISTER 
100 (LOCATION 176) TO ONE. DEFAULT IS TO NOT EXECUTE THESE TESTS. 
102 1.2 SYSTEM REQUIREMENTS 
104 KDJ11-A PROCESSOR MODULE 
105 ENSURE THAT HALT TRAP OPTION IS DISABLED (JUMPER W9 INSTALLED) 
106 32KW MEMORY 
107 Q-22 BACKPLANE (18 BIT QBUS MAY BE USED WITH REDUCED TEST COVERAGE) 
108 SERIAL LINE UNIT AND CONSOLE TERMINAL (CONSOLE TERMINAL NOT REQUIRED FOR APT) 
110 1.3 RELATED DOCUMENTS AND STANDARDS 
112 KDJ11-A MODULE SPECIFICATION REV 2.2 
113 PDP11 MAINDEC SYSMAC PACKAGE 
114 J11 CONTROL CHIP SPECIFICATION 21-17679-00 
115 Jil DATA CHIP SPECIFICATION 21-17677.00 
117 1.4 DIAGNOSTIC HIERARCY PREREQUISITES 
119 THE KDJ11 CPU, MEMORY MANAGEMENT AND FLOATING POINT DIAGNOSTICS 
120 SHOULD RUN SUCCESSFULLY PRIOR TO RUNNING THE CACHE MEMORY 
121 SYSTEM TESTS. 
isa 1.5 ASSUMPTIONS 
125 IT IS ASSUMED THAT THE DIAGNOSTIC OPERATOR IS FAMILIAR WITH 
ist THE XXDP+ OPERATING SYSTEM AND THE Jil MICRO-OOT 
128 2.0 OPERATING INSTRUCTIONS 
130 2.1 LOADING AND STARTING PROCEEDURE 
132 LOAD PROGRAM INTO MEMORY USING STANDARD XXDP+ PROCEEDURES. 
133 THE PROGRAM IS STARTED BY LOADING ADDRESS 200 AND USING 
134 THE J11 MICRO-ODT G COMMAND TO START. THE PROGRAM 
135 IDENTIFICATION MESSAGE WILL BE TYPED AFTER THE FIRST PASS 
136 OF THE COMPLETE PROGRAM 
138 2.2 PROGRAM OPTIONS 
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140 THE FOLLOWING ASSIGNMENTS HAVE BEEN MADE FOR THE KDUJ11-A 
tat DIAGNOSTIC SWITCH REGISTER BITS: 
14 
143 SITS15 LG 13 12 11 10 9 8 
144 @------- @------- @------- @------- @-------- @------- @------- @------- 2 
145 DON‘ T 18 BIT EXTENDED 
146 TEST ADDRESS CACHE 
147 BEVENT ONL Y TESTS 
148 B---e--- @------- @------- @------- @-------- @------- @------- M-----ee + 
149 
150 DEFAULT SETTINGS ARE TO TEST 22 BIT ADDRESSES AND NOT DO THE 
ozs EXTENDED CACHE TESTS. 
153 PRIOR TO EXECUTING THE FIRST PASS OF THE DIAGNOSTIC THE OPERATOR 
154 WILL BE DIRECTED TO SET THE SWITCH REGISTER TO INDICATE WHETHER 
i55 THE KDJ11-A UNDER TEST IS IN A SYSTEM CONFIGURED FOR 18 OR 22 BIT 
156 ADDRESSING AND WHETHER CACHE RAM DATA RELIABILITY TESTS ARE TO BE 
157 EXECUTED. AN 18 BIT ADDRESS CONFIGURATION SHOULD BE INDICATED IF 
158 ANY 18 ADDRESS BIT ONLY MEMORY BOARDS RESIDE IN THE SYSTEM OR IF 
159 THE SYSTEM BACKPLANE DOES NOT SUPPORT 22 ADDRESS BITS. THE CACHE 
160 RAM DATA RELIABILTY TESTS REQUIRE APPROXIMATELY 35 MINUTES TO 
161 EXECUTE AND SHOULD ONLY BE SELECTED IF PROBLEMS WITH CACHE DATA 
ye: CORRUPTION OR RETENTION ARE SUSPECTED. 
164 TO CHANGE THE SWITCH REGISTER; HALT THE PROGRAM AND RESTART IT 
<7 AT 200 ANSWERING THE INITIAL QUESTIONS. 
eH 2.3  #OPERATION UNDER APT 
169 OPERATION IN THE APT ENVIRONMENT REQUIRES SOME SPECIAL CONSIDERA- 
170 TIONS DUE TO THE ASYNCHRONOUS HALTS OF THE DIAGNOSTIC BY THE APT 
171 MONITOR. IF THE EFFECTS OF THESE HALTS ARE NOT ANTICIPATED, FALSE 
172 ERRORS MAY BE REPORTED. THEREFORE, WHEN OPERATING IN THE APT ENVIRON- 
173 MENT THE FOLLOWING DIFFERENCES IN THE EXECUTION OF THE PROGRAM SHOULD 
. BE NOTED: 
176 1. CERTAIN CACHE TESTS WHICH RELY ON THE INTEGRITY OF DATA IN THE 
177 HIT/MISS REGISTER OR THE WAY IN WHICH THE CACHE IS ALLOCATED WIL! 
178 A SUB-ROUT IF AN ERROR IS ENCOUNTERED. THE S OUTINE 
179 DETERMINES IF THE OIAGNOSTIC IS OPERATING IN APT ENVIRONMENT. IF 
180 IT IS IN APT NT IT WILL RETRY THE FAILING TEST ONE TIME. 
181 IF THE TEST PASSES ON THE SECOND ATTEMPT THE FIRST ERROR WILL BE 
182 CONSIDERED TO BE APT INDUCED. IF IT FAILS ON THE SECOND ATTEMPT 
= THE ERROR ROUTINE WILL BE CALLED. 
ee 2.4 EXECUTION TIMES 
ee A. THE LONGEST TEST 
189 THE LONGEST TEST IS THE TAG RAM DATA RELIABILITY TEST WHICH TAKES 
190 APPROXIMAELY 25 MINUTES TO EXECUTE. FOR THIS REASON THE DATA RELIABILITY 
ie TESTS ARE NORMALLY DE -SELECTED. 
193 B. FULL PASS TIME 
194 


195 THE TIME FOR A FULL PASS WITH THE DATA RELIABILITY TESTS DE -SELECTED 
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1: 

1S APPROXIMATELY 5S a WITH ALL TESTS SELECTED A FULL PASS 
TAKES ABOUT 35 MINUTES 

3.0 


° ERROR INFORMATION 
ERRORS WiLt CAUSE THE FOLLOWING ERROR MESSAGE TO BE PRINTED: 
CACHE SYSTEM ERROR 
ERROR @ = CUNIQUE ERROR NUMBER ) 
ERROR PC = (PC AT TIME OF ERROR) 


THE ERROR WILL THEN BE REPORTED TO APT AND THE PROGRAM 
WILL HALT. 


4.0 PROGRESS REPORT 


1 


AT THE END OF EACH PASS THE DIAGNOSTIC NAME AND PASS COUNT ARE PRINTED. 


€ 


SEQ 9006 
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. TITLE PROGRAM HEADER AND TABLES 
-SBTTL PROGRAM HEADER 


ETXTL,ETXTS ETXTS ETXT4 .ETXTS, ETXI6,ETXT7, ETXT8,ETXT9 
ETXT1O,ETXT11 ETXT12, ETXT13,ETXT14,ETXT15, ETXT16,ETXT17 
ETXT18,ETXT19,ETXT20 ETXT21 ,ETXT22,ETXT23 ,ETXT24 ,ETXT25 
ETXT26,ETXT27 ,ETXT28 ,ETXT29, ETXT30,ETXT31,ETXT32,ETXT33 
ETXT34 ,ETXT3S,ETXT36,ETX1T37, ETXT38,ETXT39, ETXT40,ETXT41 
ETXT42, ETXT43 ,ETXT44 ,ETXT4S ,ETXT46,ETXT47 ,ETXT48,ETXT49 
ETXTSO,ETXTS1,ETXTS2 ETXTS3S ETXT54,ETXTSS .ETXT56,ETXT5S7 
ETXTSS .ETXTSI ETXT6E0,ETXT61,ETXT62 

ERRF1,ERRF2, ERRF3,ERRF4 ,ERRFS,ERRF6,ERRF7 

ERRF 8, ERRFS,ERRF10,ERRF11,ERRF12,ERRF13,ERRF14,ERRF15 
ERRF 16,ERRF 17, ERRF18,ERRF19,ERRF20,ERRF21,ERRF22,ERRF23 
ERRF 24 ,ERRF 25, ,ERRF 26, ERRF 27, ERRF28,ERRF29,ERRF 30,ERRF31 
ERRF 52, ERRF33,ERRF34,ERRF35,ERRF36,ERRF37,ERRF38,ERRF 39 
ERRF 40, ERRF41,ERRF42,ERRF43,ERRF44 ,ERRF45,ERRF46,ERRF47 
ERRF 46 ,ERRF 49, ERRFSO,ERRF51,ERRF52,ERRF53,ERRF54,ERRFSS 
ERRF'S6,ERRF 57, ERRFS8,ERRFS9,ERRF60,ERRF61,ERRF62,ERRF63 
ERRF 64 ,ERRF65,ERRF66,ERRF67,ERRFO1,ERRFO2,ERRFO3,ERRFOS 
ERRF OS ,,ERRF 06, ERRFO7,ERRFOS ,ERRFO9,SFTERR,EXITST 
NEWTST,ERRDEF , .EQUAT, .KT11,.$40CAT, .$EOP,. $APTBLS, SETUP 


. $TYPE, .$TYPDEC,ERRDF ,BGNTST,ENDTST,BGNMOD,ENDMOD , CKLOOP 


-HEADER, .SETUP, . $TRAP ,BGNSUB,,ENDSUB, . $ACT11, . $APTHDOR 
. SAPTYPE, . SERROR, .$TYPOCT, . SREAD 


-TITLE KODJ11-A CACHE MEMORY SYSTEM TEST 
:*COPYRIGHT (C) MARCH, 1984 

;*DIGITAL EQUIPMENT CORP. 

;*MAYNARD, MASS. 01754 


34 
:*¢THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
3*PACKAGE (MAINDEC-11-DZQAC-C3), JAN 19, 1977. 


;sHALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TYPOUT 


SEQ 0007 
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001000 


177776 


177774 
177772 
177570 
17757C 
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PROGRAM HEADER 
. TITLE GLOBAL AREAS 
-SBTTL GLOBAL EQUATES SECTION 
3°? 
; THE GLOBAL EQUATES SECTION ie PROGRAM EQUATES THAT 
; ARE USED IN MORE THAN ONE TES 
‘SBTTL BASIC DEFINITIONS 
;*INITIAL ADDRESS OF THE STACK POINTER s@¢ 1000 «a0 
STACK= 1000 


-EQUIV EMT,ERROR ;sBASIC DEFINITION OF ERROR CALL 
-EQUIV IOT,SCOPE ;sBASIC DEFINITION OF SCOPE CALL 


> aaa ee DEFINITIONS 
11 ;:CODE FOR HORIZONTAL TAB 


tre 12 3;CODE FOR LINE FEED 

CR= 15 ;;CODE FOR CARRIAGE RETURN 

CRLF = 200 ;;CODE FOR CARRIAGE RETURN-LINE FEED 
PS= 177776 ;;PROCESSOR STATUS WORD 

-EQUIV PS,PSW 

STKLMT= 177774 :3;STACK LIMIT REGISTER 

PIRQ= 177772 ;;PROGRAM INTERRUPT REQUEST REGISTER 


DOSWR= 177570 ; sHAROWARE SWITCH REGISTER 
ODISP= 177570 3 sHARDWARE DISPLAY REGISTER 


5 GENERAL PURPOSE REGISTER DEFINITIONS 
RO #0 GENE 


33 RAL REGISTER 
Ri- #1 ; sGENERAL REGISTER 
R2= s2 ; ;sGENERAL REGISTER 
R3= 63 ; sGENERAL REGISTER 
R4= 64 3; ;GENERAL REGISTER 
RS= es ; sGENERAL REGISTER 
RG* tT ; ;GENERAL REGISTER 
R7= 67 ; ;sGENERAL REGISTER 
SP= 86 :3STACK POINTER 
PC: “7 3 sPROGRAM COUNTER 
:*PRIORITY LEVEL DEFINITIONS 
PRO= 0 s:sPRIORITY LEVEL O 
PRi= 40 ssPRIORITY LEVEL 1 
PRe= 100 ;sPRIORITY LEVEL 2 
PR3:= 140 ;sPRIORITY LEVEL 3 
PR4= 200 ; sPRIORITY LEVEL 4 
PRS= 240 s;PRIORITY LEVEL 5 
PR6= 300 :sPRIORITY LEVEL 6 
PR7= 340 ;sPRIORITY LEVEL 7 


3*"SWITCH REGISTER” SWITCH DEFINITIONS 
SW15= 00000 


SEQ 0008 
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BASIC DEFINITIONS 


BIT15= 


3;*BASIC 
ERRVEC= 
RESVEC= 


0 
TBITVEC=14 


TRIVEC= 
BPTVEC= 
IOTVEC= 
PWRVEC = 


1 
BITO9,B1T9 
BITO8,BIT8 


BITO4 ,BIT4 
BITO3,BIT3 
BITO2,BITe 
BIT01.BIT1 
BITOO,.BITO 


J1 


“CPU” TRAP VECTOR ADDRESSES 


4 
1 


:3;TIME OUT AND OTHER ERRORS 

yo arr AND ILLEGAL INSTRUCTIONS 
one 6 

:3;TRACE TRAP 

3 sBREAKPOINT TRAP (BPT) 

33 INPUT/OUTPUT TRAP CIOT) «eaSCOPEss 
3 sPOWER FAIL 


SEQ 0009 
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000250 


177572 
177574 
177576 
172516 


K1 
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BASIC ‘DEFINITIONS ~ 
EMTVEC= 30 ;sEMULATOR TRAP CEMT) «*#ERRORs« 
TRAPVEC =34 33"TRAP” TRAP 
TKVEC= 60 ;3;TTY KEYBOARD VECTOR 
TPVEC= 64 pie PRINTER VECTOR 
PIRQVEC=240 PROGRAM INTERRUPT REQUEST VECTOR 


-SBTTL MEMORY MANAGEMENT DEFINITIONS 
;#KT11 VECTOR ADDRESS 
MMVEC= 250 

3#KT11 STATUS REGISTER ADDRESSES 


SRO= 177572 
SR1i= 177574 
SR2= 177576 
SR3= 172516 


;#USER “I“ PAGE DESCRIPTOR REGISTERS 


UIPDR7= 177616 
s#USER “DO” PAGE DESCRIPTOR REGISTORS 


UDPDRO= 177620 
UDPDR1= 177622 
UDPDRe= 177624 
UDPDR3= 177626 
UDPDR4= 177630 
UDPORS= 177632 
UDPOR6= 177634 
UDPDR7= 177636 


3#USER “I” PAGE ADDRESS REGISTERS 


UIPARO= 177640 
UIPARI= 177642 
UIPAR2= 177644 
UIPAR3= 177646 
UIPAR4= 177650 
UIPARS= 177652 
UIPAR6= 177654 
UIPAR7= 177656 


s#USER “D” PAGE ADDRESS REGISTERS 
UDPARO= 177660 


UDPAR1= 177662 
UDPAR2= 177664 


SEG 9010 
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177666 
177670 
177672 
177674 
177676 


172216 


172220 


172242 


;#SUPERVISOR “I” PAGE DESCRIPTOR REGISTERS 


;*SUPERYISOR “D” PAGE DESCRIPTOR REGISTERS 


SOPDRO= 
SDPOR1= 
SC°DR2= 
SOPOR3= 
SOPDR4 = 
SDPDRS= 
SOPOR6= 
SDPDR7= 


;*KERNEL “I” PAGE DESCRIPTOR REGISTERS 


KIPORS= 


0:38 


177674 
177676 


172216 


172276 
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SEQ 0011 
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172310 
172312 
172314 
172316 


172320 
172322 
172324 
172326 
172330 
172332 
172334 
172336 


000244 


177746 
177744 
177752 
177766 


12 
MEMORY MANAGEMENT DEFINITIONS 


KIPDR4= 172310 
KIPDRS= 172312 
KIPDR6= 172314 
KIPDR7= 172316 


;*#KERNEL “D” PAGE DESCRIPTOR REGISTERS 


;#KERNEL “I” PAGE ADDRESS REGISTERS 


KIPARO= 172340 
KIPAR1= 172342 
KIPAR2= 172344 
KIPARS= 172346 
KIPAR4= 172350 
KIPARS= 172352 
KIPAR6* 172354 
KIPAR7= 172356 


KDPAR7= 172376 
pag = FLOATING POINT ACCUMULATOR EQUATES 


0 
AC1i= s1 
AC2= s2 
AC3= #3 
ACS= ah 
ACS= “5 
AC6= $6 
AC7= 67 
FPVEC= 244 
; THESE ARE CACHE REGISTER EQUATES 
CCR= 177746 sCACHE CONTROL REGISTER 
MSER= 177744 sMEMORY SYSTEM ERROR REGISTER 
HITMIS= 177752 sHIT/MISS REGISTER 
CPEREG= 177766 :CPU ERROR REGISTER 


SEQ 0012 


AREAS 
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000052 


001716 
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MISCELANEOUS * adilaataitleaaie 
BEVENT = 177 ;BEVENT CONTROL REGISTER 


; INITIALIZE ERROR NUMBER COUNTER 


ASWREG= 2000 ;SWR FOR APT--NO BEVENT TESTING 


;THIS EQUATE DEFINES THE BOTTOM OF THE PROGRAM STACK POINTER 
STBOT= 1000 

.ASECT 

-SBTTL TRAP CATCHER 


20 
;#ALL UNUSED LOCATIONS OF THE VECTOR AREA CONTAIN 
3#A_",+2, IOT” SEQUENCE TO CATCH AND PROCESS ILLEGAL 
;@TRAPS AND INTERRUPTS THAT MIGHT OCCUR. 
:*THE IOT TRAP WHICH IS TAKEN ON THE ILLEGAL TRAP/INT 
s*TRAPS TO THE $SCOPE ROUTINE WHICH CIF THE RETURN PC IS 
;#LESS THAN 1002) JUMPS TO THE SERROR ROUTINE. 
— SERROR ROUTINE WILL REPORT THE ERROR AS FOLLOWS: 
PC=VYYYYY UNEXPECTED TRAP TO Xxx 
; @AND RETURN TO THE PROGRAM AT PC=YYYYYY+2 
Pane XXX*LOCATION OF ILLEGAL TRAP 
YYYYYY=PC AT TIME OF TRAP 
t NOTE: IF THE PROCESSOR IS NOT AN 11/05 THE PROGRAM 
34 CAN BE STARTED AT ADDRESS O AS WELL AS ADDRESS 200. 


$40CAT: HALT 3; ;HALT 
BR ;;BRANCH TO 177700 € TIME OUT CNOT ON 


--100 
311705) 
. WORD START ;;VECTOR TO STARTING ADDRESS 
oe 0 s:;WITH PRIORITY LEVEL 7 


DISPREG: .WORD . ;s;SOF TWARE DISPLAY REGISTER 
SWREG: 3sSOFTWARE SWITCH REGISTER 
. SBTTL STARTING. ADORE S(E 


JMP @OSTART G0 TO START OF PROGRAM 
-SBTTL ACT11 HOOKS 


Fs FPSSSSSSSHSASSHESESSEAEESEEASHESESHEEEEEHEEHEESEEEKREAEEEHEEEDEOEEESE 


HOOKS oo By ACT11 


—— :SAVE PC 
SENDAD :s1)SET LOC.46 TO ADDRESS OF SENDAD IN .s€0P 
-WORD 0 332)SET LOC.52 TO ZERO 

33 RESTORE PC 


. =$SVPC 
-SBTTL APT PARAMETER BLOCK 


FF PSSSSASSSESSASSHEESSSESSSEESSSESESOASEHSESEESESEEEESEEEHEHEEOEEEEEOEEEEEE 


;SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 


SEQ 0013 
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000024 
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APT PARAMETER BLOCK 


Be 


SEQ 9014 


oT ae 1a a re ee senteesaen 


.$X-, 


.*e4 
200 


sSAVE CURRENT LOCATION 
1 aSET POWER FAIL TO POINT TO START OF PROGRAM 
:3FOR APT START UP 
ssPOINT TO APT INDIRECT ADDRESS PNTR. 
ssPOINT TO APT HEADER BLOCK 
::RESET LOCATION COUNTER 


£8 99966606 8066466466 600606660600 06060000000008464046008604006000406%0668008068 


sSETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 


s INTERFACE SPEC. 


SAPTHD: 
SHIBTS: 
SMBADR : 
STSTM: 
SPASTM: 
SUNITM: 


~*.$X 
"2 


0 
SMAIL 83 
1 


3;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
ADDRESS OF APT MAILBOX (BITS 0-15) 
7sRUN TIM OF LONGEST TEST 
4 33sRUN TIME IN SECS. OF 1ST FASS ON 1 UNIT (QUICK VERIFY) 
0 ssADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
$€ TEND - sMATL 72 3sLENGTH MAILBOX -E TABLE( WORDS ) 
SAVE CURRENT LOCATION (COUNT 


;SET UP SOME VECTORS 
sRESTORE LOCATION COUNT 


001030 


ees os abn he 44 ) 


C2 
Pe eréeal bata SEE FrOR 


-SBTTL GLOBAL DATA SECTION 

5° 

3 THE GLOBAL DATA sr CONTAINS DATA THAT ARE USED 

. IN MORE THAN ONE TEST 

‘SBTTL APT MAILBOX -ETABLE 

$i PPRSOSSEOEESEESESEESHEESASEREEEEREDADEEEEDEHEHERASCEEDEREEDREREDES 
N 


$MAIL: 33APT MAILBOX 


SMSGTY: .WORD AMSGTY ;;MESSAGE TYPE CODE 
SFATAL: .WORD AFATAL ;;FATAL ERROR NUMBER 
STESTN: .WORD ATESTN ;;TEST NUMBER 

SPASS: .WORD APASS 33PASS COUNT 

SDEVCT: .WORD ADEVCT ;;DEVICE COUNT 

SUNIT: .WORD AUNIT 331/70 UNIT NUMBER 
$MSGAD: .WORD 3: sMESSAGE ADDRESS 
SMSGLG: .WORD AMSGLG ;;MESSAGE LENGTH 
SETABLE: 3sAPT ENVIRONMENT TABLE 
SENV: .BYTE AENV s sENVIRONMENT BYTE 
SENVM: .BYTE AENVM : sENVIRONMENT MODE BITS 
$SWREG: .WORD ASWREG ;;APT SWITCH REGISTER 
SUSWR: .WORD $$ AUSWR 3;USER SWITCHES 

sCPUOP: .WORD ACPUOP ;;CPU TYPE,OPTIONS 

34 BITS 15-11*CPU TYPE 

3¢ 11/0401, ge SE 11720+03,11/40+04,11/45=05 
34 11/70=06,PDQ=07, 
34 BIT 10*REAL TIME CLOCK 
3% BIT 9=FLOATING POINT +" acaeaaat 
3° BIT 8=MEMORY MANAGEMEN 
SE TEND: 

.MEXIT 


; THESE LOCATIONS ARE USED IN MORE THAN ONE TEST TO STORE VECTOR DATA 
sWHEN THE TEST NEEOS TO HAVE AN ERROR CONDITION RESPOND DIFFERENTLY 
sFROM THE DEFAULT RESPONCE. 


SLOCOO: 0 
SLOCO1: .WORD 0 


XPDAT: . WORD 0 sSTORES EXPECTED (GOOD) DATA FOR COMPARISONS 
RECDAT: .WORD 0 sSTORES RECIEVED DATA TO BE VERIFIED 
COUNT: .WORD 0 sERROR INDICATOR FOR FLOATING POINT TESTS 
FLAG: -WORD 0 sUSED TO STORE “FLAG” CONDITIONS 
ERRCNT: .WORD 0 sSTORAGE FOR ERROR COUNT 

SWR: -WORD OSWR sSTORAGE FOR SWITCH REGISTER ADORESS 
DISPLAY: .WORD ODISP ee FOR DISPLAY REGISTER ADDRESS 
SERFLG: .WORD 0 sERROR F 


LAG 
3 THESE LOCATIONS ARE USED BY MORE TRAN ONE TEST AS LOOP COUNTERS 


0 
0 
0 ;STORAGE FOR UNEXPECTED TRAP DATA 
0 ; ” “ ” o 


SEQ 9015 


KDSEIN.ARE”? os"ABA*Aa PTL425°? 4 -APRABE hO¢8By PORE. 2° 


001120 


001122 
001122 


000020 


® 
pany 
~ 
m 
¥ 


SSSSSSSSSS55R 


20 


De 


sUSED TO INDICATE DIRECTION OF ADDRESSING 
sSTORES LEAST SIGNIFICANT BIT FOR RAM TESTS 
sSTORES WRITE DATA FOR RAM TESTS 

sDATA STORE FOR RAM TESTS 

sDATA STORE FOR RAM TESTS 

sSTORES FIRST ADDRESS IN ADDRESSING SEQUENCE 
sSTORES LAST ADDRESS IN ADDRESSING SEQUENCE 
sSTORES CURRENT ADDRESS FOR RAM TESTS 
sSTORES LOW ADDRESS FOR RAM TESTS 

sSTORES GOOD ADDRESS FOR RAM TESTS 

sADDRESS STORE FOR RAM TESTS 

sADDRESS STORE FOR RAM TF:ST 

sUSED TO STORE SOFT ERROR COUNT 

sUSED TO HOLD RETRY ADDRESS ON SOFT ERRORS 


SEQ 9016 


Ee 
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1 30A(1052) 0O4-APR-84 10:38 P 17 SEQ 9017 
KDJL1A.MAC 0O3-APR-84 11:36 GLOBAL TEXT SECTION 
697 -SBTTL GLOSAL TEXT SECTION 
698 
699 °¢ 
700 ; THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
701 ; MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
702 ; MORE THAN ONE TEST. 
703 —— 
704 
705 3 
706 ; FORMAT STATEMENTS USED IN PRINT CALLS 
3 
708 


709 001162 005015 042523 020124 OPMSG2: .ASCIZ <CR><LF>/SET BIT 8 = 1 FOR 18 BIT SYSTEM/ 
710 001170 044502 020124 020070 


715 001224 005015 042523 020124 OPMSG3: .ASCIZ <CR><LF>/SET BIT 9 = 1 FOR CACHE RAM AND TAG RAM DATA RELIABILITy TESTS/ 


1 000 
726 0013525 015 041412 041501 ERRMSG::.ASCIZ <CR><LF>/CACHE SYSTEM ERROR/ 
001346 
730 001352 005015 051105 047522 ERR1: ~ASCIZ <CR><LF>/ERROR © =/ 
001360 020043 75 
732 001366 005015 eye od 047522 ERR: -ASCIZ <CR><LF>/ERROR PC =/ 


735 001403 pk 020012 020040 SCRLF: .ASCIZ <CR°<LF>o/ 
737 001412 EVEN 


GLOBAL AREAS 
KDJL1LA.MAC 


738 
739 
740 
741 
742 
743 
744 


04-APR-84 10:38 PAGE 18 
03-APR -B4 1isse GLOBAL ERROR REPORT SECTION 


.SBTTL GLOBAL ERROR REPORT SECTION 


3¢* 
AL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 
, USED BY MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. 


SEQ 0018 


GLOBAL. 


AREAS 


KDJLLA.MA 


012701 


172240 


Ge 


O3-APR-B4 liste a APR P opal sopRouT INES SECTION 


-SBTTL GLOBAL SUBROUTINES SECTION 


3+ 


; THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 
; THAT ARE USED IN MORE THAN ONE TEST. 


ee 2 
3*¢ 


; FUNCTIONAL DESCRIPTION: 
; SUBROUTINE TO INITIALIZE ALL THE MMU REGISTERS 


; INPUTS: NONE 
3 OUTPUTS: NONE 


; FUNCTIONAL SIDE EFFECTS: NONE 


; CALLING SEQUENCE: JSR 

INITMM: MOV @172240,R1 
JSR PC, L 
MOV #172260,R1 


ARS 


LOPARS 


p 
0177640, eR1 
#177660,R1 
PC, L 
#177600,R1 
PC, L 
#177620,R1 
PC, L 
laa »R1 


PC, 

0172340,R1 
PC, LOPAR 
0172360,R1 

Cc. LOP 


DPARS 
DPORS 
DPORS 


C L S 
9172320, Ri 
Pc. LOPORS 


©172200, Ri 

PC, LDPORS 
#172220,R1 

PC. LDOPORS 
PC 


; SUBORDINATE ROUTINES USED: ano PARS 


PDRS 


PC, INITMM 
;BASE 
;BASE 
;BASE 
;BASE 
BASE 
;BASE 
;BASE 
;BASE 
;BASE 
;BASE 
;BASE 
:BASE 


ADDRESS 
ADDRESS 
ADORESS 
ADORESS 
ADDRESS 
ADDRESS 
ADORESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 


;RE TURN 


OF 


SRBRBRARARAYR SF 


SIPARS 
SDPARS 
KIPARS 
KDPARS 
UIPARS 
UDPARS 
UIPORS 
UDPDRS 
KIPDRS 
KDPDRS 
SIPORS 
SDPORS 


SEQ 0019 


He 
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012702 
00500 


*¢ 

; FUNCTIONAL DESCRIPTION: 

SUBROUTINE TO INITIALIZE ALL THE MMU PAGE ADDRESS REGISTERS (PARS). 
THIS ROUTINE WILL INITIALIZE 8 PARS STARTING AT A BASE ADDRESS 
SUPPLIED BY THE CALLING ROUTINE. PARS 0-5 WILL BE MAPPED FROM 
ADDRESS 0 TO ADDRESS 137777 (0-24K). PAR 6 WILL BE MAPPED FROM 
— 200000 TO 217777 AND PAR 7 WILL BE MAPPED TO THE I/0 


; INPUTS: 
; Ri CONTAINS THE BASE ADDRESS OF THE NEXT 8 PARS TO BE INITIALIZED 


; OUTPUTS: NONE 
; SUBORDINATE ROUTINES USED: NONE 
; FUNCTIONAL SIDE EFFECTS: NONE 


; CALLING SEQUENCE: JSR PC,LDPARS 
LDOPARS: MOV a6, Re ;LET LOOP COUNTER COUNT FIRST 6 PARS 
CLR R3 s INITIALIZE INDEX VALUE 
1$: MOV R3, C(R1)> ;LOAD PARS 
ADD #200, R3 ; INDEX IN 4K INCREMENTS 
SOB Re, 1$ ;LOAD FIRST SIX PARS 
MOV #2000, (R1)-+ ;LET PAR6 MAP TO 200000 
MOV #177600,(R1) ;LET PAR7 MAP TO I/O PAGE 
RTS PC : URN 


SEQ 9020 


GLOBAL AREAS 
KDJ1L1A.MAC 


001604 
001610 
001614 
001616 
001622 
001626 


MACY11 30A(1052) O4-APR-84 10:38 PAGE 21 
GLOBAL SUBROUTINES SECTION 


012702 
012721 
077203 
012721 
012711 
000207 


03-APR-84 11:36 


000006 
177406 


077406 
077406 


P 


Te 


3¢¢ 
; FUNCTIONAL DESCRIPTION: 


ee 62 6+ © @¢ Ge Ge 


SEQ 9021 


SUBROUTINE TO INITIALIZE ALL THE MMU PAGE DECRIPTOR REGISTERS (PODRS). 
THIS ROUTINE WILL INITIALIZE 8 PDRS STARTING AT A BASE ADDRESS 
SUPPLIED BY THE CALLING ROUTINE. PDRS 0-5 WILL BE INITIALIZED TO 
4K READ/WRITE BYPASS AND PDRS 6 AND 7 WILL BE INITIALIZED TO 
4K READ/WRITE NO BYPASS. 


NOTE: THERE IS NO NEED TO BYPASS ON I/O PAGE REFERENCES BECAUSE 
THE CACHE DOES NOT ALLOCATE ANY OF THESE REFERENCES. 
; INPUTS: 
; Ri CONTAINS THE BASE ADDRESS OF THE NEXT 8 PORS TO BE INITIALIZED 


; OUTPUTS: NONE 


; SUBORDINATE ROUTINES USED: NONE 


; FUNCTIONAL SIDE EFFECTS: NONE 


; CALLING SEQUENCE: JSR 

LOPORS: MOV 6, Re 

1$: MOV #177406,(R1)+ 
SOB Re, 1$ 
MOV #77406, (R1)+ 
MOV #77406, (R1) 
RTS PC 


PC ,LDPARS 


sLET LOOP COUNTER COUNT FIRST 6 PARS 
;LOAD PDRS WITH 4K READ/WRITE BYPASS 
sLOAD FIRST SIX PORS 

;LET PAR6 BE 4K READ/WRITE NO BYPASS 
ps yl BE 4K READ/WRITE NO BYPASS ALSO 
6 


GLOBAL AREAS 
KDJ11A.MAC 


Je 


MACY11 30AC1052) O4-APR-84 10:38 
36 GLOBAL 


03-APR-84 11: 


PAGE 22 
SUBROUTINES SECTION 
36 
; FUNCTIONAL DESCRIPTION: 
; SUBROUTINE TO HANDLE PARITY ERROR ABORTS FROM THE RAM STORE RAM TESTS. 


; INPUTS: 
; MEMORY SYSTEM ERROR REGISTER CONTAINS BITS INDICATING FAILURE 


; OUTPUTS: NONE 

; SUBORDINATE ROUTINES USED: NONE 

; FUNCTIONAL SIDE EFFECTS: NONE 

CALLING SEQUENCE: CALLED BY PARITY ABORT 
MOV 87114, SLOCOO ;SAVE CONTENTS OF PARITY ABORT VECTOR 
MOV ODSPAR, 84114 ;LET VECTOR POINT TO PARITY ABORT ROUTINE 


(CACHE PARITY ERROR OCCURS) 


RAMPAR : 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
. WORD 1 sUNIQUE ERROR NUMBER 
. WORD ERRMSG ;ADDRESS OF ERROR MESSAGE 


sCACHE SYSTEM ERROR 
RTI ;RETURN 


SEQ 9022 


Ke 


GLOBAt. AREAS MACY11 30AC1052) 04-APR-84 10:38 PAGE 23 SEQ 0023 
KDJ11A.MAC 03-APR-84 11:36 GLOBAL SUBROUTINES SECTION 


872 + 
FUNCTIONAL DESCRIPTION 


; 
3 
874 : SUBROUTINE TO HANDLE SOFT ERRORS THAT MAY BE CAUSED By 
875 ; APT SYSTEM MONITORING DURING THE CACHE TEST. FOR EXAMPLE: 
876 3 IF A TEST IS USING THE HIT/MISS REGISTER TO MONITOR CACHE 
877 ; ACTIVITY, AND APT BREAKS IN, THE HIT/MISS REGISTER WILL BE 
878 8 MODIFIED. WHEN THE TEST RESUMES, A FALSE ERROR MAY BE CAUSED Br 
879 3 THE CORRUPTED HIT/MISS REGISTER. LIKEWISE, A TEST MAY INITIALIZE 
880 3 CACHE TO A KNOWN STATE CALLOCATED/NOT ALLOCATED); AN APT 
= 3 BREAK MAY CAUSE CACHE STATE TO ALTER AND THE TEST TO FAIL. 
882 3 
883 
884 ; INPUTS 
885 3 SOF TRE CONTAINS RETURN ADDRESS TO BEGINNING OF TEST +4 TO 
aa 3 TEST AGAIN ON ERROR 
8 
a sOUTPUTS: NONE 
pany ; SUBORDINATE ROUTINES USED: NONE 
oe sFUNCTIONAL SIDE EFFECTS: NONE 
ooo ;CALLING SEQUENCE: JSR PC ,APTSFT 
896 001640 122767 000001 177152 APTSFT: CMPB @APTENV, SENV ;ARE WE IN APT MODE? 
897 001646 001022 BNE 1$ sNO SOFT ERRORS IF NOT IN APT MODE 
898 001650 005767 177242 TST SOF TER sHAS A SOFT ERROR ALREADY OCCURRED? 
899 001654 001017 BNE 1$ ;IF YES GO TO ERROR 
900 001656 062706 000002 ADD #2,R6 ;CLEAN UP THE STACK TO RETRY TEST 
901 001662 005267 177230 INC SOF TER s INCREMENT THE SOFT ERROR COUNTER 
902 001666 005037 177744 CLR @eOnSER ;CLEAR THE MSER 
903 001672 005037 177572 CLR @eSRO ;TURN OFF MMU 
904 001676 005037 177766 CLR QeOCPEREG :;CLEAR THE CPU ERROR REGISTER 
905 001702 012737 000400 177746 MOV eBITO8 ,aeCcCR ;FLUSH THE CACHE, CLEAR THE CCR 
906 001710 000177 177204 JMP @SOF TRE sRETRY TEST 
907 001714 000207 1$: RTS PC :GU0 TO ERROR. ERROR OCCURRED MORE 


908 ; THAN ONCE OR NOT IN APT MODE. 


GLOBAL AREAS 
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012737 
012706 
012737 
012737 
012737 
012737 
005067 
016767 
105067 


013746 
012737 


012637 


012767 
012737 


112767 


000014 
001000 
013314 


177777 


002044 


000176 
000174 
000004 


176716 
000200 


001022 
013314 
000340 
177766 
001162 
001224 
000042 
176650 


176666 


000001 


fy ED 30A(1052) 04-APR- 
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177746 


000004 
177030 
177024 
177014 


176774 
176770 


176723 
176740 


000020 
000022 


Le 


84 10:38 PAGE 24 


START: 
MOV #14 ,aeCCR ;SET CACHE TO FORCE MISS 

.SBTTL INITIALIZE THE COMMON TAGS 

@S . SP 3;SETUP THE STACK POINTER 


MOV TACK 
;; INITIALIZE A FEW VECTORS 
MOV @SERROR ,.Q@EMTVEC ;;EMT — FOR ERROR ROUTINE 


MOV #340, QOEMTVEC +2 ; sLEVEL 

MOV O$TRAP, BeTRAPVEC ;; TRAP VECTOR FOR TRAP CALLS 
MOV 0340, BOTRAPVEC+2:LEVEL 7 

CLR $PASS SCLEAR THE PASS COUNT 


MOV aoe” sEOPCT + SETUP END -OF -PROGRAM COUNTER 
CLRB SERFLG 3;CLEAR THE ERROR FLAG 
;;SIZE FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
;sEQUAL TO A ”-1", SETUP FOR A SOFTWARE SWITCH REGISTER. 
MOV SOERRVEC, -(SP) ;sSAVE ERROR VECTOR 
MOV 064% , BGERRVEC 3s;SET UP ERROR VECTOR 
MOV @OSWR, SWR 33SETUP FOR A HARDWARE SWICH REGISTER 
MOV @DDISP,DISPLAY ;;AND A HARDWARE DISPLAY REGISTER 
CMP #-1,8SWR 3sTRY TO REFERENCE HARDWARE SWR 


BNE 66$ ;;BRANCH IF NO TIMEOUT TRAP OCCURRED 
3:;AND THE HARDWARE SWR IS NOT = -l 
BR 65$ 3 ;B8RANCH IF NO TIMEOUT 
64$: att #653 ,(SP) SET UP FOR TRAP RETURN 
65$: MOV @SWREG . SWR :sPOINT TO SOFTWARE SwR 
MOV @DISPREG DISPLAY 
66$: MOV (SP)+,Q@@ERRVEC ;;RESTORE ERROR VECTOR 
-MACRO $$SETMAIL 2?$ARG1 
CLR $PASS ;3;CLEAR PASS COUNT 
BITB @APTSIZE,SENVM ;; TEST USER SIZE UNDER APT 
BEQ $ARG1 33;YES,USE NON-APT SWITCH 
eins MOV @S$SWREG, SWR 33NO, USE APT SWITCH REGISTER 
.ENDM $$SETMAIL 
CLR $PASS ::;CLEAR PASS COUNT 
BITS @APTSIZE.SENVM ;;TEST USER SIZE UNDER APT 
BEQ 67$ :3YES,USE NON-APT SWITCH 
aie MOV @$SWREG , SWR :3NO,USE APT SWITCH REGISTER 
MOV @SERROR , BOIOTVEC ;3;SET UP IOT VECTORS 
MOV ae, = :3TO GO TO ERROR ROUTINE 
CLR 80177766 ;CLEAR CPU ERROR REGISTER 
TYPE , ; OPERATOR nd agin 3 2 
T YPE , OPMSG sOPERATOR MESSAGE 3 
-SBTTL GET VALUE FOR SOF TWARE SuITCH REGISTER 
TST ae4e sARE WE RUNNING UNDER XxXDP/ACT? 
BNE 68$ 1 BRANCH IF YES 
CMPB SENV, 41 sARE WE RUNNING UNDER APT? 
BEQ 68$ ; |BRANCH IF YES 
CMP SWA , OSWREG 33;SOF TWARE SWITCH REG SELECTED? 
BNE 69$ | BRANCH IF NO 
ae . 3;;GET SOFT-SWR SETTINGS 
69$ 
683: MOVB #1, $AUTOB 3;SET AUTO-MODE INDICATOR 


69%: 


SEQ 0024 


Me 
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DJIIA.MAC” O3-APR-B4 415 Se GET VALUE FOR SOFTWARE SWITCH REGISTER SEQ 0025 

965 002176 005067 176602 RESTART: CLR = $TESTN ;RESET sTESTN TO ZERO 

966 002202 012737 000014 177746 MOV 014, 80CCR ;SET CACHE TO FORCE MISS 

968 

969 SF FP@ASSSASSEASELASESASELELEASEEASREAARASEAESARESAEAALEEAAEAARERERADE 

970 ;#TEST 1 CACHE REGISTER ACCESS TEST 

971 Ss FPESSESSASASSALESSSSASASERABEAASLELABRAREREAAAARARAERRAEAREBALERERA 

972 ;CHECK REGISTER ACCESS - THIS TEST WILL VERIFY EACH OF THE THREE 

973 sCACHE MEMORY SYSTEM REGISTERS CAN BE ACCESSED WITHOUT A TRAP TO 

974 sLOCATION 4(NON-EXISTANT ADDRESS TRAP) OCCURRING. THE REGISTERS TO 

975 ;BE TESTED ARE: 

976 ; CACHE CONTROL 17777746 

977 : MEMORY SYSTEM ERROR 17777744 

978 ; HIT/MISS 17777752 

979 ;EACH REGISTER WILL BE ACCESSED WITH A WRITE CYCLE. 

981 ;BGNTST 

982 ;SAVE CONTENT OF LOCATION 4 

983 ;LET LOCATION 4 POINT TO ERROR ROUTINE 

984 sTEST THE CACHE REGISTERS 

985 ;RESTORE CONTENTS OF LOCATION 4 

986 sEXIT TST 

987 : 

988 sCACHE REGISTER ADDRESSES 

989 ; CCR= 17777746 

990 ; MSER= 17777744 

991 ; HITMIS= 17777752 

992 sERROR ROUTINE: ERROR IN CACHE SYSTEM 

993 : RETURN 

994 ;ENDTST 

995 5S SSASASESAASEHSEESASELESEALELALASCESLEAAALACAALARALEALAALERAAASLAALLSE 

996 002210 TST1: 

997 002210 005267 176570 INC $TESTN ; INCREMENT TEST NUMBER 

998 002214 013767 000114 176606 MOV 8114 ,SLOCOO ;SAVE PARITY INTERRUPT VECTORS 

999 002222 012737 001630 000114 MOV ORAMPAR , 80114 ;SET UP TRAP CATCHER FOR PARITY ERRORS. 
1000 002230 013704 000004 MOV 804 ,R4 :SAVE CONTENTS OF VECTOR 4 

1001 002234 012737 002302 000004 MOV @ERROUT , 804 ;LET VECTOR 4 POINT TO ERROR ROUTINE 
1002 002242 005037 177746 CLR BeCCR sTEST ACCESS TO CACHE CONTROL REG 
1003 002246 005037 177744 CLR QeMSER ls sTEST ACCESS TO MEMORY SYSTEM ERR REG 
1004 002252 005037 177752 CLR @eHITMIS sTEST ACCESS TO HIT MISS REGISTER 
1005 002256 010437 000004 MOV R4,a04 ;RESTORE VECTOR 

006 002262 005037 177744 CLR @OMSER _ 3CLEAR THE MEM SYS ERROR REG 

1007 002266 005037 177766 CLR @eCPEREG ;CLEAR THE CPU ERROR REGISTER 

008 002272 005037 001116 CLR @OSOF TER ;CLEAR THE SOFT ER T 

1009 002276 000167 000010 JMP TST2 ; JUMP OVER DATA TABLES OR SUBROUTINES 
1010 ;TO NEXT TEST 

1011 

1012 002302 ERROUT: 

1013 002302 104000 ERROR sALL ERRORS TO TRAP TO EMT VECTOR 
1014 002304 000002 .WORD 2 ;UNIQUE ERROR NUMBER 

1015 002306 001325 .WORD ERRMSG ;ADDRESS OF ERROR MESSAGE 

1016 ;CACHE SYSTEM ERROR 
1017 002310 000002 RTI ;CONTINUE FROM ERROR 

1019 


Ne 



















osttAGit1,30AC1052) 04-APR-84 10:38 
SBT LA. HAL. ‘Ba 11386 i CACHE REGESTER ACCESS TEST SEQ 0026 
1021 
1022 002312 cTsT2: 
1023 | 9gsaeaedoccosogesacgesvessossscosacooccossensoscoecescecossonce 
1024 VaTEST 2 TEST CACHE CNTRL REG BITS 
1025 pO IIIB. pb Bs oe Bo 1, ROOT TITER 
1026 iCCR REGISTER BIT TEST - THIS TEST WILL VERIFY THAT EACH READ/WAITE BIT OF 
1027 HE CACHE C REGISTER CAN BE SET AND CLEARED INDIVIDUALLY AND THAT 
1028 ‘arts 18 - {1 AND O1T bane KCUAYS READ AS Sena" 
‘ 
1030 $ 
1031 VINITTALIZE GOOD DATA TO 01 
1032 CLEAR © 
1033 ;00 UNTIL ALL BITS TESTED 
1034 - WRITE DATA TO CCR 
1O8e + IF Meck T EQUAL 6000 DA DATA THEN 
be 
1037 Tr Mr QUAL 
1038 - BAYK NOY EQUAL TO O119¢18-11> cn OTT ¢ THEN 
1039 ‘. ERROR IN CACHE SYSTEM 
1040 ts ENDIF 
1041 te ; EL 
1042 : ERROR IN CACHE SYSTEM 
1043 he ENDIF 
1044 A‘ ENDIF 
1045 :. ATE TO NEXT BIT 
3 
1047 eNOrer 
1048 SESEEEOEEEEEESEEOEAEEELEEAOEEHASAOEAEREEAEEEAEEEEEEEEEEEEREEDEEES 
1049 002312 ts 
1050 002812 005267 176466 INC sTESTN SINCREMENT TEST NUMBER 
1051 002316 012701 1 MO RI SINITIALIZE GOOD DATA TO 41 
1052 002322 7 175420 C ccr CLEAR R 
1053 002826 010167 175414 Ls: V i CCR ;WRITE DATA TO CCR 
10 4 908 2 0 70 175410 c A, i ' iF CCR NOT EQUAL GOOD DATA 
1056 Sis 00576 175402 cR ITF CCR EQUAL TO ZERO 
i 002346 032701 174400 0174400,R1 TF GOOD DATA NOT BITS«15-11> OR 8 
tet 00835s 00 ; 4s 
1060 002 ‘ACL TERRORS ah gitar, 70 ENT VECTOR 
is Ses Ste ! ae ep gue 
1062 002860 001525 ERRMSG SS OF ERROR MESSAGE 
106 :CACHE SYSTEM ERROR 
1064 002362 000403 4s sENOIF 
1065 002364 3%; 
t 002364 104000 1ALL ERRORS 10 TRAP TO EMT VECTOR 
1068 ' e BALES OF 
1068 002370 0013825 . ERRMSG SS OF "ERROR. ness 
1069 Acre vsrsren ERROR 
1070 002372 022787 002000 177746 4%: MP  —«s- @2000, @@CCR WAS LAST FUNCTION WA ONG TAG PAR? 
1071 002400 001008 NE + Snir T ANO'DO WERT Test. 
107¢ 002402 012787 000400 177746 MOV 0400, @0CCR FLUSH ACHE TO GET RID OF URONG 
1074 002410 006101 S$; ROL AL IBDATE TO NEXT BIT 
1075 OO2412 10884° acc is ;00 UNTIL ALL BITS TESTED 


6B3 
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KDJ11A.MAC 03-APR-84 11:36 T2 TEST CACHE CNTRL REG BITS 
1077 
1078 002414 CTsT3: 
1079 8 8 9O0044664604660646646606 606646 06006066006066060060600060066460666060660060006 
1080 s*TEST 3 TEST FORCE MISS FUNCTION 
1081 8 3 9O8660066660066 060606 00660066600606004600600006000600060000064066806 
1082 sFORCE MISS TEST - THIS TEST WILL VERIFY THAT ALL REFERENCES MADE 
1083 sWITH EITHER BIT<3> OR BIT<2> OF THE CCR SET CAUSE A CACHE MISS AND 
1084 sLEAVE THE CACHE ENTRY UNCHANGED. FIRST WRITE A TEST ADDRESS WITH 
1085 sBITS<3:2> CLEARED TO ALLOCATE CACHE AND SET A KNOWN DATA PATTERN 
1086 sINTO THE CACHE. THEN SET BIT<2> AND REWRITE THE SAME ADDRESS WITH 
1087 sNEW DATA. NEXT CLEAR BITS<3:2> AND READ THE TEST ADDRESS, THE DATA 
1088 sSHOULD EQUAL TO PATTERN 1. FINALLY READ THE TEST ADDRESS WITH BIT<3> 
1089 sSET, THE DATA SHOULD EQUAL PATTERN 2. A LAST WRITE MUST BE DONE WITH 
1090 ;BOTH FORCE BITS CLEARED BECAUSE THE CACHE AND MAIN MEMORY HAVE 
1091 sOIFFERENT DATA, 
1092 H 
1093 3 
1094 :B8GNTS: 
1095 sWRITE TEST ADDRESS WITH PATTERN 1 
1096 sSET CCR BITS<3:2> = 0,1 
1097 sWRITE TEST ADDRESS WITH PATTERN 2 
1098 sCLEAR CCR BIT<3> 
1099 sREAD TEST ADORESS 
1100 sSAVE HIT/MISS REGISTER DATA 
1101 sCOMPARE RECEIVED DATA TO PATTERN 1 
1102 :IF DATA NOT EQUAL THEN 
1103 Ss ERROR IN CACHE SYSTEM 
1104 s ENDIF 
1105 sSET CCR<3:2> = 1,0 
1106 sREAD TEST S 
1107 sSAVE HIT/MISS REGISTER DATA 
1108 sCOMPARE RECEIVED DATA TO PATTERN 2 
1109 3IF DATA NOT EQUAL THEN 
1110 e ERROR IN CACHE SYSTEM 
1111 sENDIF 
11l1le sCLEAR CCR<3:2> 
1113 sWRITE TEST ADDRESS 
tet sENDTST 
° 
1116 £3 9OSO00604660640 606606066 6000660060600000600606000000000000000008060806 
1117 002414 TSTS3: 
1118 002414 005267 176364 INC STESTN s INCREMENT TEST NUMBER 
1119 002420 012737 002550 000114 MOV OF MPARR .80114 sSETUP PARITY VECTOR TO POINT TO HANOLER 
1120 002426 005037 001122 CLR 8eTSTLOC sWRITE TEST LOCATION WITH PATTERN 1 
1121 sALLOCATES CACHE AND MEMORY WITH ZEROS 
ll22 002432 012767 000004 175306 MOV eBITO2, CCR sSET CCR BITS<3:2> = O,1LC FORCE CACHE MISS) 
1123 002440 012737 177777 OO01122 MOV 0177777 a@eTSTLoc sWRITE TEST LOCATION WITH PATTERN 2 
1124 sWRITES MEMORY WITH ONES, CACHE STILL ZEROS 
1125 002446 012767 000200 175272 MOV 200, CCR :;CLEAR CCR BIT 3 (CLEAR FORCE MISS) 
1126 t SET PARITY ABORTS 
1127 002454 013701 001122 MOV BeTSTLOC,R1 sREAD TEST ADDRESS (SHOULD READ ZEROS IN CACHE ) 
1128 002460 005701 TST Ri :COMPARE RECEIVED DATA TO PATTERN 1 
1129 002462 001403 BEG 1% 3IF DATAS NOT EQUAL THEN 
1130 002464 104000 ERROR s;ALL ERRORS TO TRAP TO EMT VECTOR 
1131 002466 5 . WORD 5 sUNIQUE ERROR NUMBER 
1132 002470 001325 . WORD ERRMSG sADDRESS OF ERROR MESSAGE 


GLOBAL. 

KDJ11A, 
1133 
1134 
1135 


1136 
1137 


ARE AS 
MAC 


002570 


052767 
013701 
020127 
001403 
104000 
000006 
001325 


005267 176222 
012737 002702 000114 
005037 001122 
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000010 175246 


001122 
177777 


im 


10: 85 PPBECE MISS FUNCTION SEQ 028 


sCACHE SYSTEM ERROR 


1$: BIS #BITO3, CCR sSET CCR BITS <3:2> = 1,0CFORCE CACHE MISS) 
MOV BOTSTLOC,R1 sREAD TEST LOCATION (SHOULD READ ONES IN MEMORY) 
CMP Ril, 0177777 sCOMPARE RECEIVED DATA TO PATTERN 2 
BEG es sIF DATAS NOT EQUAL THEN 
ERROR sALL ERRORS TO TRAP TO EMT VECTOR 
.WORD 6 sUNIQUE ERROR NUMBER 
. WORD ERRMSG sADDRESS OF ERROR MESSAGE 
sCACHE SYSTEM ERROR 
2s: CLR CCR sCLEAR CCR BITS<3:2> 
CLR SeTSTLOC sWRITE TEST ADDRESS 
CLR QOMSER s;CLEAR THE MEM SYS ERROR REG 
CLR Q@eCPEREG :;CLEAR THE CPU ERROR REGISTER 
CLR QeSOF TER ;CLEAR THE SOFT ERROR COUNT 
JMP TST4 ;JUMP OVER DATA TABLES OR SUBROUTINES 
:TO NEXT TEST 
FMPARR: sPARITY ERROR ON FORCE MISS 
ERROR s;ALL ERRORS TO TRAP TO EMT VECTOR 
. WORD 7 sUNIQUE ERROR NUMBER 
.WORD ERRMSG sADDRESS OF ERROR MESSAGE 
CTST4: 


§ FSCASEASESEREEESEAOEOEEEEEEEEEEDEDOEEDEREROEEEOREROEEEEEEOOEEEE 

;*TEST 4 TEST HIT MISS REGISTER 

§ SPPASHESSSEASASASEASEESEESEOHEAEHEEEHEDESEHESEEEEEDEEEEEOEEEEESS 
sHIT/MISS REGISTER TEST PART 1 - THIS TEST WILL VERIFY THAT THE HIT/MISS 
sREGISTER CORRECTLY LOGS HITS AND MISSES.FIRST WRITE A TEST ADORESS WITH 
sBITS<35:2> CLEARED TO ALLOCATE CACHE AND SET A KNOWN DATA PATTERN INTO 
sTHE CACHE. THEN SET BIT<2> AND REWRITE THE SAME ADDRESS WITH NEW DATA. 
sNEXT CLEAR CCR BITS<3:2> AND READ THE TEST ADDRESS, THE HIT/MISS REGISTER 
sSHOULD HAVE LOGGED A HIT. FINALLY READ THE TEST ADDRESS PLUS 20000(8) THE 
sMIT/MISS REGISTER SHOULD HAVE LOGGED A MISS. 

é 


sBGNTST 

sWRITE TEST ADDRESS WITH PATTERN 1 

sSET CCR BYTS<3:2> « 0,1 

sWRITE TEST ADDRESS WITH PATTERN 2 
sCLEAR CCR BIT<3> 

sREAD TEST ADDRESS 

3 IF ete ie ae BIT 3 NOT SET THEN 


Se IN CACHE SYSTEM 

sENDIF 

sREAD TEST ADDRESS + 20000(8) 

sIF HIT/MISS REGISTER BIT 3 SET THEN 

ie ERROR IN CACHE SYSTEM 

sENDIF 

sENDTST 

3 

5394800600666 4664440664686666666466606466606060646006060006464606006004600600686 

TST4: 
INC STESTN s INCREMENT TEST NUMBER 
MOV OHMPARR , 80114 ;SETUP PARITY VECTOR TC POINT TO HANDLER 
CLR BOTSTLOC sWRITE TEST LOCATION WITH PATTERN } 


DS 


GLOBA: AREAS te 30A( 1052) 04-APR-84 10:38 PAGE 29 SEQ 0029 
KDJ11A.MAC O3-APR-84 11:36 14 TEST HIT MISS REGISTER 
1189 sWRITE CACHE ANC MEMORY WITH ZEROS 
1190 002574 012767 000004 175144 MOV @BITO2, CCR sSET CCR BITS<3:2> = 0O,1°(FORCE CACHE MISS) 
1191 002602 012737 177777 001122 MOV 0177777, 8@TSTLOC sWRITE TEST LOCATION WITH PATTERN 
1192 sMEMORY =-1, CACHE STILL ZERO 
1193 002610 012767 000200 175130 MOV #200, CCR iCLEAR CCR BIT 3 (CLEAR FORCE MISS) 
1194 AND SET PARITY ABORTS 
1195 002616 013701 001122 MOV 8OTSTLOC,R1 ;READ TEST ADDRESS (SHOULD BE , at HIT) 
196 002622 932737 000010 177752 BIT OBITO3, BOHITMIS sIF HIT/MISS REGISTER BIT 3 NOT S 
1197 26 001903 BNE 1$ 3 THEN 
1198 002632 104000 ERROR sALL ERRORS TO TRAP TO EMT VECTOR 
1199 2634 000010 . WORD 10 sUNIQUE ERROR NUMBER 
1200 002636 001325 -WORD ERRMSG sADDRESS OF ERROR MESSAGE 
1201 sCACHE SYSTEM ERROR 
1202 002640 013701 021122 1$: MOV QOTSTLOC +8192. ,R1 sREAD TEST LOCATION + 20000(8) SHOULD MISS 
1203 002644 032737 000010 177752 BIT OBITOS, SeHITMIS sIF HIT/MISS REGISTER BIT 3 SET 
1204 002652 001403 BEQ 2s 3 THEN 
1205 002654 104000 ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
1206 002656 000011 . WORD il sUNIQUE ERROR NUMBER 
1207 002660 001325 -WORD ERRMSG sADDRESS OF ERROR MESSAGE 
1208 ;CACHE SYSTEM ERROR 
1209 002662 2s: 
1210 002662 005037 177744 CLR QOMSER :CLEAR THE MEM SYS ERROR REG 
1211 002666 005037 177766 CLR G@eCPEREG ;CLEAR THE CPU ERROR REGISTER 
1212 002672 005037 001116 CLR BeSOF TER ;CLEAR THE SOFT ERROR COUNT 
1213 002676 000167 000006 JMP TsT5 sJUMP OVER DATA TABLES OR SUBROUTINES 
tes ;TO NEXT TEST 
1216 002702 HMPARR : sPARITY ERROR DURING HIT/MISS REGISTER TEST 
1217 002702 104000 ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
1218 002704 000012 . WORD 12 sUNTIQUE ERROR NUMBER 
th C02706 001325 -WORD ERRMSG sADDRESS OF ERROR MESSAGE 
1221 
1222 
1223 002710 CTsTSs: 
1224 § SPHOMOSOSESASSSESSARHEHSEEEHEERESESSAEHRERARAKEESRARRAEROEEEEEEEE 
1225 s*TEST 5 TEST HIT MISS REGISTER BITS 
1226 $ SPPOAOSSSHSHEASESEHESEEAOAEAHEESEEEEEEEAEKESEAHEEHEDERERELARALLS 
1227 sHIT/MISS REGISTER TEST - THIS TEST WILL VERIFY THAT THE HIT/MISS 
1228 sREGISTER CORRECTLY LOGS CACHE HITS AND MISSES. IT WILL ALSO VERIFY 
1229 sTHAT EACH BIT OF THE oye teh IS UNIQUE. THIS WILL BE DONE By 
1230 sFLOATING A ZERO THROUGH A FIELD OF ONES. THE ROTATING WILL BE DONE 
1231 sBY EXECUTING A TST BOHM CWHERE HM IS THE ADDRESS OF THE HIT/MISS 
1232 sREGISTER) AT SUCCESSIVE POSITIONS IN A SET OF FOUR NOPS. THE READ 
1235 sOF THE I/O PAGE ADDRESS OF THE HIT/MISS REGISTER SHOULD CAUSE A 
1234 sMISS TO BE RECORDED. 
1235 i 
1236 sBGNTST 
1237 s INITIALIZE LOOP INDICATOR 
1238 sINITIALIZE EXPECTED DATA 
1239 300 UNTIL LOOP INDICATOR = SEVEN 
1240 Se PUT BACKGROUND DATA INTO EXECUTION BUFFER 
1241 S. PUT TST INSTRUCTION INTO TEST LOCATION 
1242 ie JUMP TO EXECUTE BUFFER 
1243 t ¥ EXPECTED DATA NE RECEIVED DATA THEN 
1244 3. ERROR IN CACHE SYSTEM 


AREAS 


GLOBAL. 
KDJ11A.MAC 


MAC111 30A(1052) 04-APR-84 
0O3-APR-84 11:36 TS 


004767 


176070 
001630 
176132 
020000 
003070 
176116 
000007 
003052 
001122 
001122 


176122 
176050 


002714 
176614 


177744 
177766 
001116 
000034 


177752 


000114 


000007 


001120 


3. 

ts 

3 
;ENDDO 
;EXIT 


10:38 PAGE 30 
TEST HIT MISS REGISTER BITS 


ENDIF 


aa 


INCREMENT LOOP INDICATOR 
UPDATE EXPECTED DATA 


TST 


; 
;BACKGROUND DATA: 


SEQ 9030 


§ s PASSSASSASSSSHSEEASSEASEAEAADEAASOEAELEAREEEREKASEASCHAEEAEHEASERESE 


$ NOP 
; NOP 
$ NOP 
3 NOP 
: MOV 8eHN RS 
3 RTS PC 
sENDTST 
TSTS 
INC $TESTN 
MOV @RAMPAR , 80114 
CLR L IN 
MOV o 
MOV @EXPTBL .R4 
18: CMP LOOPIN, ¢7 
BEQ ENDHRT 
MOV 07.R5 
MOV SBACDAT,R1 
MOV @TSTLOC Re 
2s: MOV CR1)+, (CR2)- 
S0B ‘ $ 
TST TSTLOCC(R3) 
TST CR3)> 
JSR PC, TSTLOC 
BNE 3$ 
INC LOOPIN 
“a BR is 
MOV @TSTS+4, @OSOF TRE 
JSR PC ,APTSFT 
ERROR 
. WORD 13 
e ERRMSG 
ENDHRT : 
CLR QeMSER 
CLR @eCPEREG 
CLR @eSOF TER 
JMP TST6 
BACDAT: .WORD NOP 
. WORD NOP 
. WORD NOP 
. WORD NOP 
MOV BOHITMIS,RS 
RTS PC 


; INCREMENT TEST NUMBER 

;SET UP VECTOR FOR UNEXPECTED PARITY ERROR 
; INITIALIZE LOOP INDICATOR 

;LOAD R3 WITH 1ST ADOR IN 2ND BANK OF MEM. 
;GET ADORESS OF EXPECTED DATA TABLE 

300 UNTIL LOOP INDICATOR EQUALS 7 

3 THEN EXIT 

;LOAD R2 WITH 7 

sPUT BACKGROUND DATA INTO 

sEXECUTION BUFFER 


;LOOP FOR SEVEN WORDS 

;SETUP MISS ON FETCH OF INSTRUCTION 
;INC R3 BY 2 

:GO EXECUTE TEST CODE 

;IF EXPECTED DATA NOT EQUAL TO 
sRECEIVED DATA THEN 

; INCREMENT LOOP COUNTER 

3 


sMOVE RETRY ADDRESS TO SOFT RETURN 
:GO TO SOFT ERROR SUBROUTINE 
sALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 


;CLEAR THE MEM SYS ERROR REG 

;CLEAR THE CPU ERROR REGISTER 

sCLEAR THE SOFT ERROR COUNT 

3; JUMP OVER DATA TABLES OR SUBROUTINES 
;TO NEXT TEST 


sSAVE CONTENTS OF HIT/MISS REGISTER 


ra 


GLOBAL AREAS ¥11 30AC1052) 04-APR- 10: - 3 

KDJ1L1A.MAC 03 APR Ba 11:6 784 fes1 AtT rtss REGISTER BITS 
1301 003070 000077 EXPTBL: .WORD 77 
1302 003072 000037 . WORD 37 
1303 003074 000057 .WORD 57 
1304 003076 000067 . WORD 67 
1305 003100 000073 . WORD 73 
1306 003102 000075 . WORD 75 
1307 003104 000076 . WORD 76 
1308 
1309 
1310 
1311 
1312 003106 CTST6: 
1313 § SPPRSAAASESAAEEASALESAREEEASESEASEEEEAEAEAEESHALESSRAAEAERERELERES 
1314 s#TEST 6 TEST BYTE ALLOCATION OF CACHE 
1315 5 § PPSEAAEAAEAEASESSAREASASASASEAEEACASESESAEREREEESEAEADREREEDEEDRES 
1316 ;BYTE ALLOCATION TEST- THIS TEST WILL VERIFY THAT THE CACHE SYSTEM CORRECTLY 
1317 sHANDLES BYTE ACCESSES. THE TEST WILL FIRST CHECK THAT A WRITE ACCESS WHICH 
1318 3IS A MISS DOES NOT UPDATE THE CACHE. THIS WILL BE DONE BY FIRST ASSURRING 
1319 3A MISS AT A TEST LOCATION. THEN A WRITE BYTE ACCESS WILL BE DONE. FINALLY 
1320 ;THE LOCATION WILL BE READ. THE WRITE BYTE SHOULD NOT HAVE ALLOCATED THE 
1321 sADDRESS. NEXT THE TEST WILL VERIFY THAT IF A WRITE BYTE ACCESS IS A HIT 
1322 ;THAT THE CACHE LOCATION IS UPDATED. THE TEST WILL FIRST WRITE A TEST LOCATION 
1323 sWITH A PATTERN TO ALLOCATE THE ADDRESS. THEN A SECOND PATTERN WILL BE WRITTEN 
1324 3:10 THE HIGH BYTE OF THE TEST LOCATION. THE TEST LOCATION WILL THEN BE READ. 
1325 IF THE HIGH BYTE OF THE TEST LOCATION IS EQUAL TO THE SECOND PATTERN THEN THE 
1326 sLOCATION WAS UPDATED. THE SECOND TEST WILL BE REPEATED TO TEST LOw BYTE 
1327 s ACCESSES. 
1328 3 
1329 sBGNTST 
1330 sSAVE VECTOR 114 
1331 sLET VECTOR 114 POINT TO BYTE PARITY ROUTINE 
1332 ;SET PARITY ABORT BIT IN CACHE CONTROL REGISTER 
1333 sREAD TEST LOCATION + 4K 
1334 sWRITE LOW BYTE TO TEST ADDRESS 
1335 sREAD LOW BYTE OF TEST ADDRESS 
1336 ;IF HIT/MISS REGISTER BIT 3 SET THEN 
1337 ee ERROR IN CACHE SYSTEM 
1338 sENOIF 
1339 sWRITE PATTERN 1 TO TEST LOCATION 
1340 sWRITE BYTE PATTERN 2 TO TEST LOCATION:>1 
1341 sIF BIT1 NOTSETIN HIT/MISS REGISTER THEN 
1342 Ss ERROR IN CACHE SYSTEM 
1343 sELSE : 
1344 3. READ TEST LOCATION 
1345 3. IF RECEIVED DATA NOT EQUAL TO EXPECTED DATA THEN 
1346 i - ERROR IN CACHE SYSTEM 
1347 sENDIF | 
1348 sWRITE PATTERN 1 TO TEST LOCATION 
1349 ;sWRITE BYTE PATTERN 2 TO TEST LOCATION LOW BYTE 
1350 ;IF BIT1L NOTSETIN HIT/MISS REGISTER THEN 
1351 be ERROR IN CACHE SYSTEM 
1352 ;ELSE 
1353 Rs READ TEST LOCATION 
1354 ‘ IF RECIEVED DATA NOT EQUAL TO EXPECTED DATA THEN 
1355 t. ERROR IN CACHE SYSTEM 
1356 ;ENDIF 


SEQ 0031 


AREAS 


1A.MAC 


004767 


000407 
022737 


015770 


175764 
175760 
000010 


003112 
176454 


175724 
000377 
000010 


003112 
176412 


177400 


003112 
176360 


175630 
000377 
000010 


003112 
176316 


000377 


000114 
174620 


177752 
001120 


001123 
174540 


001120 


001122 
001120 


001122 
174444 


001120 


001122 


GS 


smi OOD Re ocatten OF CACHE 


;CLEAR CACHE CONTROL REGISTER 
sRESTORE VECTOR 114 
;EXIT TST 
3 
;BYTE PARITY ROUTINE: SAVE MSER 
8 RETURN 
sENDTST 
3 § FSESOSSASEAEEASCHEESEAEAOEEEECEASEAEAAREEESEAESLEAEERESALERERESERELAAS 
TST6: 
INC $STESTN ; INCREMENT TEST NUMBER 
MOV @BYPARR ,8¢114 sLET VECTOR 114 POINT TO ABORT ROUTINE 
MOV @BITO7, CCR :;SET PARITY ABORT BIT IN CCR 
TST TSTLOC +8192. sREAD TEST LOCATION + 4K TO CAUSE MISS 
;ON NEXT ACCESS OF TSTLOC 
CLRB TSTLOC ;sWRITE LOW BYTE OF TEST LOCATION 
TST8 TSTLOC sREAD LOW BYTE OF TEST LOCATION 
BIT SBITO3, S@HITMIS ;IF BITS OF HIT/MISS REGISTER NOT SET 
BEQ 1$ ; THEN BRANCH 
MOV @TST6+4,@0SOF TRE sMOVE RETRY ADDRESS TO SOFT RETURN 
JSR PC .APTSFT :GO TO SOFT ERROR SUBROUTINE 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
. WORD 14 s UNIQUE ERROR NUMBER 
. WORD ERRMSG ;ADDRESS OF ERROR MESSAGE 
;CACHE SYSTEM ERROR 
1$: CLR TSTLOC sWRITE PATTERN 1 TO TEST LOCATION 
BISB 0377, BeTSTLOC +1 sWRITE PATTERN 2 TO HIGH BYTE 
BIT #BITO3S, HITMIS :IF BITS NOTSETIN HIT/MISS REGISTER 
BNE 2$ 3; THEN 
MOV @TST6+4 , BOSOF TRE sMOVE RETRY ADDRESS TO SOFT RETURN 
JSR PC ,APTSFT :GO TO SOFT ERROR SUBROUTINE 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
.WORD i5 :; UNIQUE ERROR NUMBER 
. WORD ERRMSG ;ADDRESS OF ERROR MESSAGE 
sCACHE SYSTEM ERROR 
BR 3$ ;ELSE 
2s: CMP #177400, a@TSTLOC ;IF TEST LOCATION NOT EQUAL TO 
BEQ 3$ sPATTERN 2 THEN 
MOV biped Q@OSOF TRE ;MOVE RETRY ADDRESS TO SOFT RETURN 
JSR PC, APTSFT :GO TO SOFT ERROR SUBROUTINE 
ERROR sALL ERRORS TO TRAP TO EMT VECTOR 
. WORD 16 ;UNIQUE ERROR NUMBER 
. WORD ERRMSG sADDRESS OF ERROR MESSAGE 
sCACHE SYSTEM ERROR 
3$: CLR TSTLOC ;WRITE PATTERN 1 TO TEST LOCATION 
BISB #377, BeTSTLOC sWRITE PATTERN 2 TO LOW BYTE 
BIT oBITOS, HITMIS ;IF BITOS SET IN HIT/MISS REGISTER 
BNE 4$ Py BRANCH; WE GOT A HIT. 
3EL 
MOV oT eees @OSOF TRE sMOVE RETRY ADORESS TO SOFT RETURN 
JSR PC AP TSFT :GO TO SOFT ERROR SUBROUTINE 
ERROR sALL ERRORS TO TRAP TO EMT VECTOR 
. WORD 17 sUNIQUE ERROR NUMBER 
. WORD ERRMSG s;ADDRESS OF ERROR MESSAGE 
= ;CACHE SYSTEM ERROR 
B 5$ 
4$; CMP 0377, ae¢TSTLOC :IF TEST LOCATION NOT EQUAL TO 


SEQ 9032 


KD 


OBA AREAS 
JL1A.MA 


1413 
1414 
1415 


003340 
003342 
003344 
003346 


003350 
003354 
003360 
003364 
003370 


003374 
003374 
003376 
003400 


003402 


03- 


HS 


MACY11 30AC1052) 0O4-APR-84 10: P 33 
APR ba ve T6 fest By TE ALLOCATION OF CACHE 
001403 BEG 5$ ;PATTERN 2 THEN 
104000 ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
000020 -WORD 20 sUNIQUE ERROR NUMBER 
001325 -WORD ERRMSG sADDRESS OF ERROR MESSAGE 
:;CACHE SYSTEM ERROR 
005067 174372 S$: CLR CCR ;CLEAR CCR BEFORE EXIT 
005037 177744 CLR QeMSER ;CLEAR THE MEM SYS ERROR REG 
005037 177766 CLR @eCPEREG ;CLEAR THE CPU ERROR REGISTER 
005037 001116 CLR @eSOF TER ;CLEAR THE SOFT ERROR COUNT 
000167 JMP TST7 ;JUMP OVER DATA TABLES OR SUBROUTINES 
;TO NEXT TEST 

BYPARR: ;sPARITY ERROR DURING BYTE ALLOCATION TEST 

104000 ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
21 -WORD e211 ;s UNIQUE ERROR NUMBER 

001325 .WORD ERRMSG ;ADDRESS OF ERROR MESSAGE 

CTST?: 


SS SPRAASASAEESESESAEEALARASEADEDEERERESERADADEAREDEREDEEAAREEEESD 

s#TEST 7 TEST CACHE BYPASS (MMU) 

fs PHASSAHASSSESADEREREASASAAESADASAREDASEREREREDARALAREREREREREEE 

sPOR BIT1S (BYPASS) TEST - THIS TEST WILL VERIFY THAT WHEN BIT<15> IS SET 

;IN A PDR AND AN ACCESS IS MADE TO A LOCATION MAPPED BY THE SELECTED POR 

; THAT WOULD NORMALLY CAUSE A CACHE ACCESS, THE CACHE IS BYPASSED (I.E. THE 
sCACHE LOCATION IS INVALIDATED AND A MAIN MEMORY IS READ. THIS WILL BE DONE 
BY FIRST WRITING A TEST LOCATION WITH A KNOWN PATTERN TO ALLOCATE THE ADDRESS. 
sTHEN THE LOCATION WILL BE WRITTEN AGAIN WITH THE MMU ENABLED AND BIT <15> SET 
IN THE CONTROLING POR WITH A NEW PATTERN. THE LOCATION WILL THEN BE READ 

sAND A MISS SHOULD BE LOGGED IN THE HIT/MISS REGISTER. THIS READ WILL ALSO 
sBRING VALID DATA INTO CACHE FROM MEMORY. THE MMU WILL AGAIN BE ENABLED 

sWITH BIT <15> SET AND A READ CYCLE DONE. THIS SHOULD INVALIDATE THE CACHE. 
sNEXT THE MMU WILL BE DISABLED AND THE LOCATION READ FOR A THIRD TIME. THIS 
sWILL BE DONE WITH BIT<15> STILL SET. A MISS SHOULD ALSO BE LOGGED. LASTLY 
sBIT<15> WILL BE CLEARED AND THE MMU ENABLED AND THE LOCATION AGAIN READ. 
;THIS TIME A CACHE HIT SHOULD BE LOGGED. 

i 


3 
;sBGNTST 

sSETUP MMU REGISTER 

;sWRITE TEST LOCATION WITH PATTERN 1 
;SET BIT<15> IN POR FOR TEST LOCATION 
sENABLE MMU 

sWRITE TEST LOCATION WITH PATTERN 2 
;sDISABLE MMU AND CLEAR BIT<15> IN PDR 
sREAD TEST LOCATION 


sIF HIT/MISS REGISTER BIT<1> SET THEN 
ERROR IN CACHE SYSTEM 


; ENDIF 
;SET BIT<15> IN PDR FOR TEST LOCATION 
ENABLE MMU 


3 E 

sREAD TEST LOCATION (SHOULD INVALIDATE CACHE ) 
sDISABLE MMU 

sREAD TEST LOCATION 

:IF HIT/MISS REGISTER BIT<i> SET THEN 


SEQ 0033 


GLOBAL 


KDJLIA. 


AREAS 


MAC 


03-APR 


001012 
00506 


175376 


000010 


173742 
003406 
175776 


000114 


166646 
177572 
001122 
166620 
174260 


001120 


166556 
177572 
166536 


174172 


001120 


177572 


174130 


001120 


gr ae 30AC 1052) 04-APR-84 
-84 11:36 17 


he 
;ENDIF 


37 


10:38 


ha 


PAGE 34 
TEST CACHE BYPASS (MMU) 
ERROR IN CACHE SYSTEM 
;CLEAR SIT<15> IN PDR 
URN ON MMU 


sREAD TEST LOCATION 
:IF HIT/MISS REGISTER BIT<1> NOT SET THEN 


sENDTST 


2s: 


3$: 


ERROR IN CACHE SYSTEM 


$TESTN 


oOo, 
0177777 ,@@TSTLOC 
SRO 
@BIT15, KIPDRO 
@eTSTLOC,R1 
— HITMIS 
@TST7+4,80SOF TRE 
PC ,APTSFT 
22 
ERRMSG 


@BIT1S. KIPDRO 
@BI TOO, @eSRO 


TSTLOC 
#BIT1S, KIPDRO 
SRO 


@eTSTLOC 
> aia MITMIS 


@TST7+4,8@SOF TRE 
APTSFT 


23 


ERRMSG 
#BITOO,8@SRO 
aOTSTLOC 

@BITOS, HITMIS 
4$ 

SRO 
@TST7+4,@@SOF TRE 
PC,APTSFT 

24 


SEQ 9034 


t 
PECOCULP CLIT irri rit rr irr rr rr itt TTT TTT TT TTTTTTTTTTTTTT TTT TTT 
TST7: 


s INCREMENT TEST NUMBER 

;SET UP FOR UNEXPECTED PARITY ERROR 

sSETUP MEMORY MANAGEMEMT REGISTERS 

sWRITE TEST LOCATION WITH PATTERN 1 

run BIT15 IN POR FOR TEST LOCATION 
ON MEMORY MANAGEMENT 

SWRITE TEST LOCATION WITH PATTERN 2 

;TURN OFF MEMORY MANAGEMENT 

sCLEAR BIT15 IN POR FOR TEST LOCATION 

sREAD TEST LOCATION 

— REGISTER BIT 3 SET 


é 
sMOVE RETRY ADDRESS TO SOFT RETURN 
3GO TO SOFT ERROR SUBROUTINE 
sALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 
3SET BIT1S IN POR FOR M24 LOCATION 
;TURN ON MEMORY MANAGEMENT 
sREAD TEST LOCATION, BYPASS CACHE 
sTURN OFF CACHE BYPASS ON KERNEL PAGE 0. 
sTURN OFF MMU 
sREAD TEST LOCATION-SHOULD BE CACHE MISS 
ao REGISTER BIT 3 SET 


sMOVE RETRY ADDRESS TO SOFT RETURN 
sGO TO SOFT ERROR SUBROUTINE 
;ALL ERRORS TO TRAP TO EMT VECTOR 
s UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 
;CACHE SYSTEM ERROR 
TURN ON . MENT 


-MORY Y MANAGE 
;READ TEST LOCATION ONE MORE TIME 
sPREVIOUS READ gs HAVE ALLOCATED 
sCACHE SO WE'RE EXPECTING A CACHE HIT 
oe REGISTER BIT 3 NO; SET 
‘ 
sTURN OFF MMU BEFORE ERROR ROUTINE. 
sMOVE RETRY ADDRESS TO SOFT RETURN 
:GO TO SOFT ERROR SUBROUTINE 
;ALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 


GLOBAL AR 


AREAS 


KDJ11A.MAC 


003646 


MACY11 30A( i052) 


O3-APR-84 11:36 


000001 173714 4%: 


177744 
177766 
001116 
000000 


175102 


000400 173770 


04-APR-84 10:38 
T7 


177572 


JS 


PAGE 35 
TEST CACHE BYPASS (MMU) 


-WORD ERRMSG sADDRESS OF ERROR MESSAGE 
;CACHE SYSTEM ERROR 
BIC @BITOO, SRO ;TURN OFF MMU 
CLR QOMSER sCLEAR THE MEM SYS ERROR REG 
CLR BOCPEREG ;CLEAR THE CPU ERROR REGISTER 
CLR @eSOF TER s;CLEAR THE SOFT ERROR COUNT 
JMP TST10 ;JUMP OVER DATA TABLES OR SUBROUTINES 


;TO NEXT TEST 


CTST10: 
PEC Tre rr retire rrr tri tier rrr TTT TTT TTT TTTTTTTTTTTTTTTTTTTT TTT 


s#TEST 10 TEST CACHE FLUSH 


; 
;BGNTST 

;GET FIRST ADDRESS OF 8KB BUFFER 

s INITIALIZE LOOP COUNTER TO 4KWORD COUNT 
;00 UNTIL LOOP COUNTER = 0 

be READ S@ADDRESS:> 

;ENDDO 

;GET FIRST ADDRESS OF 8KB BUFFER 


s INITIALIZE LOOP COUNTER TO 4KWORD COUNT 

sINITIALIZE MISS COUNT 

3FLUSH CACHE 

3:00 UNTIL LOOP COUNTER = 0 

- READ SADDRESS> 

S. IF HIT/MISS REGISTER BIT<1> SET THEN 

tu DECREMENT MISS COUNT 

te ENDIF 

iTF MISS COUNT NOT EQUAL TO 4096. THEN 
ERROR IN CACHE SYSTEM 

SENDIF 

sENDTST 

3 

83 260084646446 64464666666664660646 6666464664666 046664464600660466666606060066 

TST10: 
INC $TEST ; INCREMENT TEST NUMBER 
JSR PC, INI TMM : INITIALIZE MMU 
CLR KIPAR6 sLET PAR6 POINT TO LOW 4K 
MOV #140000 ,R1 ;GET ADDRESS OF 8K BYTE BUFFER 
MOV 04096... : INIT LOOP COUNTER TO 4K WORD COUNT 
BIS &BITOO,@@SRO sENABLE MMU 

1$: TST (Ri )- sREAD ADDRESS TO ALLOCATE CACHE 
SoB Re, 1$ :00 UNTIL ALL LOCATIONS ALLOCATED 
MOV #140000,R1 ;GET ADDRESS OF 8K BYTE BUFFER 
MOV #4096., Re s INIT LOOP COUNTER TO 4K WORD COUNT 
MOV 64096., R3 ;PRE-LOAD MISS COUNT WITH 4096. 
MOV #400, CCR ;FLUSH CACHE 

2s: TST (R1)> sREAD ADDRESS 


SEQ 0025 


GLOBAL AR 
KDJ1L1A.MAC 


EAS 


0 


i 30A( 1052) 04-APR 
3-APR-84 11:36 


032737 
001401 


005303 
077207 


005067 
022703 
001410 


012737 
004767 


000010 177752 


173572 
010000 


003702 
175620 


177572 
177744 
177766 
001116 
000000 


001120 


KS 


sSHOULON’ T GET HITS AT CR 


SEQ 9036 


1) 
54 — IN HIT/MISS REG INDICATES A MISS 
BRANCH TO 3$ --DON’T DECREMENT THE MISS COUNT 


;ELS 

sDECREMENT MISS COUNT IF WE GET A HIT 
;LOOP UNTIL ENTIRE CACHE CHECKED 
;FALLING THR 
;CACHE LOCATIONS HAVE BEEN CHECKED. 

; TURN OFF MMU 

;IF MISS COUNT NOT EQUAL TO 4096. 
;THEN IT INDICATES THAT NOT ALL CACHE 
sLOCATIONS WERE FLUSHED 


sMOVE RETRY ADDRESS TO SOFT RETURN 
3GO TO SOFT ERROR SUBROUTINE 
s;ALL ERRORS TO TRAP TO EMT VECTOR 
; UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 
;TURN OFF MMU 


;CLEAR THE MEM SYS ERROR REG 

;CLEAR THE CPU ERROR REGISTER 

sCLEAR THE SOFT ERROR COUNT 

; JUMP OVER DATA TABLES OR SUBROUTINES 
;TO NEXT TEST 


§ F FSSASSASEASEEASASAASAASESSESASASLASESASEASEAEEAEREEARERELEDERELELELSE 


-84 10:38 PAGE 36 
T10 TEST CACHE FLUSH 
BIT #BITO3,@@HITMIS 
BEQ 3$ 
DEC R3 
3$: SOB Re, 2$ 
CLR SRO 
CMP #4096., R3 
BEQ 5$ 
MOV oe unter’ @OSOF TRE 
JSR PC .AP SFT 
ERROR 
. WORD 25 
. WORD ERRMSG 
5$: CLR 8¢SRO 
CLR QOMSER 
CLR BeCPE 
CLR @eSO0F TER 
JMP TSTil 
CTSTll: 
s*#TEST i1 


sBIT<9> IS SET, A MEMORY REFERENCE IS FORCED TO MAIN MEMORY. 


TEST UNCONDITIONAL CACHE BYPASS 


§ SPEARS EEASAASSSEEESAEEADEEEAEDODEEDEEEEDEEDAEEREREDEDADEEEEEREEES 
sUNCONDITIONAL BYPASS TEST - THIS TEST WILL VERIFY THAT WHEN CCR 


THIS 


sWILL ALSO VERIFY THAT READ AND WRITE HIT INVALIDATE THE CACHE 
sLOCATIONS WHEN BYPASS IS SET. 


sBGNTST 
;READ arr LOCATIONS TO SETUP POSSIBILITY OF HIT 


oH CCR 


READ FIRST. TEST LOCATION 


; ENDIF | 
sWRITE SECOND TEST LOCATION 


$. 
sENDIF 


;sCLEAR CCR BIT<9> 


sREAD FIRST LOC 
;IF HIT/MISS REGISTER BIT<1> SET THEN 
ERROR IN CACHE SYSTEM 


sREAD SEC 


OND LOCATION 
;IF HIT/MISS REGISTER BIT<1> SET THEN 


ATION 


3. ERROR IN CACHE SYSTEM 


SIF HIT/MISS REGISTER BIT<1> Bacal SET THEN 
ERROR IN CACHE SYSTE 


sIF HIT/MISS REGISTER BIT<1> NOT SET THEN 
RROR IN CACHE SYSTEM 


OUGH SOB INDICATES THAT ALL 


GLOBAL 


ARE AS 


KD.'11A.MAC 


03-APR 


00 
032703 


or Se 30AC 1052) 
-B4 11:36 


004056 


000010 


001122 
000010 


004056 
175370 


177701 
177701 


000010 


04-APR-84 10:38 P 


173652 
173644 
001120 


001120 


173516 
001120 


Til 


; ENDIF 
;ENDTST 


AGE 37 
TEST UNCONDITIONAL CACHE BYPASS 


=. 


£ s PEMSEASAESESSSEEAAEEESALAEALALAAEABASELAEEEEALASAALEAAEARESEEDLADS 


TST1l: 


1$: 


2s: 
100$: 


4$; 
200$: 


$TESTN 
8eTSTLOC 
QeTSTLOC+2 
#BITO9, CCR 


8¢TSTLOC 

= HITMIS 
@TST11+4, SOF TRE 
PC,APTSFT 


26 
ERRMSG 


BeTSTLOC+2] 
QeHITMIS,R3 
#100$ ,R4 
@TSTLOC+2,R2 
$177701,R4 
ne 


101$ 
@BITOS, R3 
3$ 

102$ 
@BITO],RS 
3$ 


@TST11+4, @OSOF TRE 
PC ,APTSFT 


27 
ERRMSG 


QeTSTLOC 
oer tee HITMIS 


@TST11+4,@@SOF TRE 
C,APTSFT 


30 

ERRMSG 
QeTSTLOC+2 
HITMIS,R3 
92008 ,R4 
#TSTLOC+2,Re2 
0177701,R4 
a aroone 


201% 
OBITO3, R3 


s INCREMENT TEST NUMBER 
sALLOCATE FIRST TEST LOCATION 
sALLOCATE SECOND TEST LOCATION 
sSET CCR BIT 9 (CACHE BYPASS) 
sREAD FIRST TEST LOCATION 
a REG. BIT 3 NOT SET 


° 
sMOVE RETRY ADDRESS TO SOFT RETURN 
;GO TO SOFT ERROR SUBROUTINE 
sALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 
sWRITE SECOND LOCATION 
sSAVE CONTENTS OF HIT MISS 
sMOV ADDR OF MOV INST TO R4 


+ 
sSTRIP OFF UNNEEDED BITS 


+ 

sARE THEY EQUAL? 

;BRANCH IF NOT 

:;IF HIT/MISS REG. BIT 3 NOT SET 
; THEN 

;IT WAS A MISS, GO TO ERROR 
;TEST BITO2 

sBRANCH IIF IT WAS A HIT 


sMOVE RETRY ADDRESS TO SOFT RETURN 
:GO TO SOFT ERROR SUBROUTINE 
sALL ERRORS TO yl TO EMT VECTOR 
; UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

sCACHE SYSTEM ERROR 
sREAD FIRST TEST LOCATION 
ce REG. BIT 3 SET 


sMOVE RETRY ADDRESS TO SOFT RETURN 
:GO TO SOFT ERROR SUBROUTINE 
;ALL ERRORS TO TRAP TO EMT VECTOR 
; UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 
sWRITE SECOND LOCATI ION 
sSAVE CONTENTS OF HIT MISS REG 
i 
4 


> 

sARE THEY EQUAL 

;BRANCH IF NOT 

IF HIT/MISS REG. BIT 3 NOT SET 


SEQ 0037 


GLOBAL. 


AREAS 


KDJ11A.MAC 


MACY11 30A(1052) 04-APR-84 
O3-APR-84 11:36 Til 


001414 
000403 
032703 
001410 
012737 


000004 


004056 
175276 


173372 
177744 
177766 
001116 
000000 


001120 


MS 
10:38 


PAGE 38 
TEST UNCONDITIONAL CACHE BYPASS 


BEG 3$ ; THEN EXIT TEST 
BR 202% sELSE;EXPECTED A MISS GO TO ERROR 


201%: BIT @BITO2,.R3 sIF HIT/MISS REG. BIT 2 NOT SET 
dita BEG 5$ ; THEN EXIT TEST.ELSE GO TO ERROR 
MOV #TST11+4, SOF TRE ;sMOVE RETRY ADDRESS TO SOFT RETURN 
JSR PC ,APTSFT :GO TO SOFT ERROR SUBROUTINE 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
-WORD 31 s UNIQUE ERROR NUMBER 
.WORD ERRMSG sADDRESS OF ERROR MESSAGE 
;CACHE SYSTEM ERROR 
S$: CLR CCR ;CLEAR BYPASS BIT BEFORE EXIT 
CLR QOMSER ;CLEAR THE MEM SYS ERROR REG 
CLR ae’CPEREG ;CLEAR THE CPU ERROR REGISTER 
CLR QeSOF TER ;CLEAR THE SOFT ERROR COUNT 
JMP TSTle2 ;JUMP OVER DATA TABLES OR SUBROUTINES 
;TO NEXT TEST 
CTSTle: 


§ FRAAARAAASEAEEEAEEAREEERSEDERERERAAEAEEEEDEREDADEADAEEEEEEREDEEEE 
;#TEST 12 TEST WRITE WRONG DATA PARITY 

ote seen ase, Weasel ne neeestneeetes ees eAbSoasensescoososoose£s 
sWRITE WRONG DATA PARITY TEST- THIS TEST WILL VERIFY THAT WHEN CCR 
sBIT<6> = 1 AND CCR BITS<7,0> = 0,1, A READ MISS OCCURS AFTER A 
sWRITE. THE WRITE WITH CCR BIT<6> = 1 TO A LOCATION WILL CAUSE A 
sCACHE UPDATE AND WRONG PARITY TO BE WRITTEN SO WHEN THE LOCATION 
sIS READ INSTEAD OF A HIT BEING RECORDED THE CACHE PARITY ERROR 
sWILL CAUSE A CACHE MISS. THIS TEST WILL BE DONE A BYTE AT A TIME. 
sNOTE: IF BOTH ERRORS OCCUR CCGA MOST LIKELY BAD. 

3 IF ONLY ONE ERROR OCCURS CCGA LEAST LIKELY. 


;BGNTST 

sSAVE CONTENTS OF VECTOR 1 

sLET VECTOR 114 POINT TO ABORT ROUTINE 
s;CLEAR MSER 

;IF MSER NOT CLEAR T 

o ERROR IN CACHE. SYSTEM 

3 


NDIF 
;WRITE TEST LOCATION 
;SET BITS<6,0> IN CCR 

:sWRITE TEST LOCATION LOW BYTE 

;CLEAR ee BIT<6> CWRITE WRONG DATA PARITY) 


s INITIALIZE ERROR INDICATORS 

sREAD TEST LOCATION LOW BYTE 

3IF BIT<1> SET IN HIT/MISS REGISTER THEN 
ee ERROR IN CACHE SYSTEM 

sELSE 

‘ If MSER BITS <7:5> ZERG THEN 

Be ERROR IN CACHE SYSTEM 

Ss ENDIF 

;ENOIF 

;CLEAR 


MSER 
;IF MSER NOT CLEAR THEN 
ERROR IN CACHE SYSTEM 


is 
sENDIF 
:;SET CCR BIT<6> 


SEQ 0038 


GLOBAL AR 
KDJ11A.MAC 


EAS 


MACY11 30A(1052) 04-APR-84 10 
03-APR-84 11:36 


005037 
012767 


112767 


06 
173324 


000340 


173204 
173200 


:38 PAGE 39 
T12 TEST WRITE WRONG DATA PARITY 


;WRITE TEST po eel HIGH BYTE 

;CLEAR CCR BIT 

sREAD TEST LOCATION HIGH BYTE 

;IF BIT<1> SET IN HIT/MISS REGISTER THEN 


— ERROR IN CACHE SYSTEM 

$ 

36 IF MSER BITS <7:5> ZERO THEN 
Bs ERROR IN CACHE SYSTEM 
.. ENDIF 

; ENDIF 


sRESTORE CONTENTS OF VECTOR 114 
;IF ERROR INDICATORS SST THEN 


SEQ 0039 


3 ERROR IN CACHE SYSTEM 
; ENDIF 
— TST 
‘DATA PARITY ABORT ROUTINE: 
EE ERROR IN CACHE SYSTEM 
; RETURN 
: 
sENOTST 
fF PRAAASAAASAERESEAAEAEAEASAREDAAEAAAAAAAAAAEAABARAREAEAAEEARARES 
TSTil2: 
INC $TESTN ; INCREMENT TEST NUMBER 
174422 MOV 80114, SLOCcoo ;SAVE CONTENTS OF VECTOR 114 
000114 MOV @DAPABO , 84114 ;LET VECTOR POINT TO ABORT ROUTINE 
CLR MSER ;CLEAR MSER 
TST MSER ;IF MSER NOT CLEAR 
BEG 1$ ; THEN 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
. WORD 32 ; UNIQUE ERROR ER 
-WORD ERRMSG ;ADDRESS OF ERROR MESSAGE 
: sCACHE SYSTEM ERROR 
1$: CLR SeTSTLOC ;WRITE TEST LOCATION TO ALLOCATE CACHE 
173300 MOV #101, CCR ;SET BITS<6,0> IN CCR 
;WRITE WRONG DATA PARITY; IGNORE PARITY INTERRUP 
174446 MOVB $377, TSTLOC ;sWRITE LOW BYTE WITH BAD PARITY 
173264 BIC @BITO6, CCR ;CLEAR WRITE WRONG DATA PARITY ‘BIT 
TSTB Q@éTSTLOC ;sREAD LOW BYTE OF TEST LOCATION 
173256 oi oo HITMIS en A MISS; IF BIT 3 SET IN HIT/MISS REGISTE 
001120 MOV @TST12+4, @eSOF TRE sMOVE RETRY ADDRESS TO SOFT RETURN 
JSR PC ,.APTSFT ;GO TO SOFT ERROR SUBROUTINE 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
. WORD 33 ; UNIQUE ERROR NUMBER 
-WORD ERRMSG sADDRESS OF ERROR MESSAGE 
;CACHE SYSTEM ERROR 
173220 23: BIT #340, MSER ;IF MSER BITS <7:5> ZERO 
BNE 3$ ; THEN 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
. WORD ; JINIQUE ERROR NUMBER 
-WORD ERRMSG :ADDRESS OF ERROR MESSAGE 
;CACHE SYSTEM ERROR 
3$: CLR MSER ;CLEAR MSER 
TST MSER ;IF MSER NOT CLEAR 
BEQ 4$ 3; THEN 


GLOBAi. ARE 
KDJ11A.MAC 


AS 


MACY11 30A( 1052) 
O35 APR-84 11:36 


012767 
016737 


005037 
005037 


005037 
000167 


104000 
000040 
001325 
000002 


000340 


000400 
174144 


177744 
177766 
001116 
000010 


04 - APR -84 
Ti2 


173164 4%: 


173142 
001120 


173102 


173066 
000114 


58: 


6$: 
7$: 


DAPABO: 


CTSTi3: 


10:38 PAGE 40 
TEST WRITE WRONG DATA PARITY 


B4 


35 
ERRMSG 


©BITO6, CCR 

@377, BOTSTLOC +1 
- 

_ HITMIS 


@TST1i2+4, BOSOF TRE 
PC ,APTSFT 


36 
ERRMSG 


6$ 
0340, MSER 
6$ 

37 

ERRMSG 


eBIT08,.CCR 
SLOCOO, 80114 


BOMSER 
SeCPEREG 
@OSOF TER 
TST13 


40 
ERRMSG 


sALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR ER 
sADDRESS OF ERROR MESSAGE 

sCACHE SYSTEM ERROR 
sSET CCR BIT 6 (WRITE WRONG PARITY) 
sWRITE HIGH BYTE OF TEST LOCATION 
sCLEAR WRITE WRONG PARITY BIT 
sREAD HIGH BYTE OF TEST LOCATION 
4 my 3 SET IN HIT/MISS REGISTER 


sMOVE RETRY ADDRESS TO SOFT RETURN 
sGO TO SOFT ERROR SUBROUTINE 
sALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

sCACHE SYSTEM ERROR 
3GO TO NEXT TEST IF NO HALT ON ERROR 
an" <7:5> ZERO 


sALL ERRORS TO TRAP TO EMT VECTOR 
s UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

sCACHE SYSTEM ERROR 
sFLUSH CACHE, CLEAR CCR BEFORE EXIT 
sRESTORE CONTENTS OF VECTOR 114 


;sCLEAR THE MEM SYS ERROR REG 
sCLEAR THE CPU ERROR REGISTER 
sCLEAR THE SOFT ERROR COUNT 


sJUMP OVER DATA TABLES OR SUBROUTINES 


3;TO NEXT TEST 


sALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 


8 8 OOS 6664664646866666646466646666664666006660606606880666000060068006008008 


s*TEST 13 


TEST WRITE WRONG TAG PARITY 


FF SSSSHSSOSSSESSAASESEHASSHASEESERADASEEEEEHEEHHEKEEEEREKHEDHEOEE 


BE 
PARITY. WHEN THE LOCATION IS READ INSTEAD 


;0F A CACHE HIT OCCURRING THE PARITY ERROR SHOULD CAUSE A CACHE 


sMISS. 


j 
sBGNTST 


sSAVE CONTENTS OF VECTOR 114 


sLET VECTOR 114 POINT TO ABORT ROUTINE 


;CLEAR MSER 


SEQ 9040 


C4 


RDSYIA.AAE“? os"ABA'Aa PEL42°°? O*-APREBG 10:58 PARE Al noNG TAG PARITY 


005267 


013767 
012737 
005067 


016737 
0050 


174062 


004722 
174630 


174100 
000114 


172776 
172764 
172756 
001120 


172712 
000114 


sSET WRITE WRONG TAG PARITY BIT<10> 

sWRITE TEST LOCATION 

sCLEAR CCR BIT<10> AND SET ABORT DISABLE BIT<0O> 
sREAD TEST LOCATION 

sIF BIT<1> SET IN HIT/MISS — THEN 

3. ERROR IN CACHE SYS 


3EL 

ba ERROR IN CACHE SYSTEM 
sENDIF 

Tt a 114 
“ed 


; TAG PARITY ABORT ROUTINE: 
H ERROR IN CACHE SYSTEM 
RETURN 


;ENDTST 


8 8 FOSS O684086 0600660060006 6060606060460046006060060600046 6000606066600 006808088 


T5713: 
INC $TESTN s INCREMENT TEST NUMBER 
OO OSSSSSSSRSCEROEEEEOe NOTE Seecsaacecrcanseessareees 
; DON’T SINGLE STEP THIS CODE USING THE ODT P COMMAND!!! 
; PARITY ERRORS WILL OCCUR. 


8 SSSSSHOAEAEEEEEESESEEEHEEEAEEHEDEEKAOKAEOEEEHEEEEEEEEEE 


SEQ 9041 


MOV 80114, StOocoo sSAVE CONTENTS OF VECTOR 114 

MOV @TAPABO 80114 sLET VECTOR POINT TO ABORT ROUTINE 

CLR MSER :;CLEAR MSER 

MOV #2001, CCR sSET WRITE WRONG TAG PARITY & NO taal INTERRVP 

CLR 8e@TSTLOC sWRITE LOCATION WITH BAD TAG PARIT 

MOV @BITOO, CCR sCLEAR BIT 10 AND SET NO PARITY INTERRUPTS 

TST @eTSTLOC sREAD TEST LOCATION 

ao > phbee HITMIS ate 3 SET IN HIT/MISS REGISTER 

MOV @TST13+4,@OSOF TRE sMOVE RETRY ADDRESS TO SOFT RETURN 

JSR ~APTSFT :GO TO SOFT ERROR SUBROUTINE 

ERROR :ALL ERRORS TO TRAP TO EMT VECTOR 

-WORD 41 sUNIQUE ERROR NUMBER 

-WORD ERRMSG sADDRESS OF ERROR MESSAGE 

sCACHE SYSTEM ERROR 

- BR 2s sELSE 

ERROR sALL ERRORS TO TRAP TO EMT VECTOR 

-WORD 42 s UNIQUE ERROR NUMBER 

-WORD ERRMSG sADDRESS OF ERROR MESSAGE 

sCACHE SYSTEM ERROR 

2$: MOV #6iT08,CCR sFLUSH CACHE, CLEAR CCR BEFORE EXIT 

MOV SLOCOO, 80114 sRESTORE CONTENTS OF VECTOR 114 

CLR BeMSER s;CLEAR THE MEM SYS ERROR REG 

CLR @OoCPEREG ;CLEAR THE CPU ERROR REGISTER 

CLR BeSOF TER :;CLEAR THE SOFT ERROR COUNT 

JMP TST14 sJUMP OVER DATA TABLES OR SUBROUTINES 

3TO NEXT TEST 

TAPABO: 

ERROR sALL ERRORS TO TRAP TO EMT VECTOR 

-WORD 43 sUNIQUE ERROR NUMBER 

-WORD ERRMSG sACDRESS OF ERROR MESSAGE 


D4 


KBSTIA.HAE «os APR Aa Pes he>e? OF -APREFG 10:38. PARE BA ou: Tac PARIT: 


005070 


005072 


000002 


005267 
004767 


012767 
0127357 


po fo 


173706 
174310 


165244 
001122 


172446 
172612 


173652 
000114 


RTI ;CACHE SYSTEM ERROR 


CTST15: 

SS PPAOAEAESESESSEEEEEEEESAAEEAEASEEOAEEEESEEEREDRE SE OEEREDEDEDEEEDES 
s*TEST 14 TEST PARITY INTERRUPT 

§ § PPSASSSESSSSESEASESSEASAEEEREEEEEEOEEEEEEEEOD EL OOEEEREDEEREEEREDS 
sPARITY INTERRUPT TEST - THIS TEST WILL VERIFY THAT WHEN CCR<7,0> = 
30,0, A PARITY INTERRUPT OCCURS AFTER EXECUTION OF AN INSTRUCTION 
sTHAT HAS BEEN WRITTEN WITH WRONG PARITY. 


;BGNTST 

s;SAVE CONTENTS OF 114 

;SETUP VECTOR 114 TO POINT bi INTERRUPT ROUTINE 
sCLEAR EXPECTING INTERRUPT FLAG 

sWRITE TEST ADDRESS WITH BAD PARITY 

;SET EXPECTING INTERRUPT FLAG 

:READ TEST ADDRESS 

:IF INTERRUPT FLAG NE O THEN 

So iie ERROR IN CACHE SYSTEM 

3 


ate rat CONTENTS OF VECTOR 114 
: 


S INTERRUPT ROUTINE : IF EXPECTING INTERRUPT FLAG NE 1 THEN 


i on ERROR IN CACHE SYSTEM 
cnotr CLEAR CEXPECTING) INTERRUPT FLAG 


IF SAVED PC NE TO UPDATED PC THEN 
ciae ERROR IN CACHE SYSTEM 


IF MSER NE @340 THE 
ERROR IN CACHE SYSTEM 


SEQ 9042 


ENDIF 
RE TURN 
sENDTST 
3 § SSSSSSSSSHOSHSHESEEEHEKEEHSEHEAEHEEEHAEEHHEEEEHEEKAEKEHDEEKREDROEEEREODLSE 
TST14: 
INC $TESTN : INCREMENT TEST NUMBER 
JSR PC, INI TMM ;INIT MMU; PAGE ZERO REFERENCES WILL 
sB8YPASS CACHE. 
MOV 91600 , KIPARG6 ;SET PARG TO RELOCATE TO BANK 7 
MOV #140000 , 8@TSTLOC ;SET UP TEST LOCATION TO OBTAIN 
sPHYSICAL ADDR VIA KIPARG. 
BIS @BI TOO, SRO ;TURM ON MMU 
CLR Bt sCLEAR EXPECTING INTERRUPT FLAG 
BIS @BITO6, CCR 3SET WRITE WRONG DATA PARITY 
CLR QaTSTLOC sWRITE CACHE LOCATION O WITH BAD DATA PARITY 
CLR CCR sCLEAR WRITE WRONG DATA PARITY 
CLR BOMSER s INIT MSER 
MOV 80114,SL0CO0O ;SAVE CONTENTS OF VECTOR 1 
MOV @INTERR 80114 ILET VECTOR POINT TO INTERRUPT ROUTINE. 
COM Ri 3;SET EXPECTING INTERRUPT FLAG 


GLOBAL 


AREAS 


KDJ11A.MAC 


03-APR 


005777 
005701 


001403 
104000 


000044 
001325 
016737 
005067 


001403 


jer Fg 30A( 1052) 
-84 11:36 


173730 


E4 


04-APR-84 10:38 PAGE 43 
T14 TEST PARITY INTERRUPT SEQ 9043 
INTRPC: TST aTSTLOCc sREAD TEST LOCATION; SHOULD GET PARITY INTERRUPT 


173620 000114 


172354 
000400 
177744 
177766 
001116 
000052 


005172 


000340 172440 


177746 


TsT Ri sRETURN HERE FROM INTERRUPT 
sIF INTERRUPT FLAG NOT EQUAL ZERO 


BEQ 1% S THEN WE DION’T GET A PARITY INTERRUPT. 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
.WORD 44 sUNIQUE ERROR NUMBER 
. WORD ERRMSG sADDRESS OF ERROR MESSAGE 
—e SYSTEM ERROR 
1$: MOV SLOCOO, 84114 sRESTORE — 114 
CLR SRO 3 TURN OFF 
MOV #BITO8 ,aeCCR 3FLUSH CACHE. CLEAR CCR 
CLR QOMSER ;CLEAR THE MEM SYS ERROR REG 
CLR BeCPEREG ;CLEAR THE CPU ERROR REGISTER 
CLR @eSOF TER ;CLEAR THE SOFT ERROR COUNT 
JMP TST15 ;JUMP OVER DATA TABLES OR SUBROUTINES 
3;TO NEXT TEST 
INTERR: i 7 ieee INTERRUPT FLAG NOT SET 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
.WORD 45 ; UNIQUE ERROR NUMBER 
-WORD ERRMSG sADDRESS OF ERROR MESSAGE 
;CACHE SYSTEM ERROR 
2$ sELSE 
1%: CLR Ri sCLEAR CEXPECTING) INTERRUPT FLAG 
2s: CMP aSP, @INTRPC +4 :IF SAVED PC NOT EQUAL TO UPDATED PC 
BEG 4$ 3; THEN 
ERROR s;ALL ERRORS TO TRAP TO EMT VECTOR 
-WORD 46 s UNIQUE ERROR NUMBER 
-WORD ERRMSG sADDRESS OF ERROR MESSAGE 
;CACHE SYSTEM ERROR 
4$: CMP #340, MSER ;IF MSER NOT EQUAL TO EXPECTED VALUE 
BEQ 5$ 3; THEN 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
-WORD 47 :; UNIQUE ERROR NUMBER 
WORD ERRMSG :ADDRESS OF ERROR MESSAGE 
sCACHE SYSTEM ERROR 
5$: RTI ;RE TURN 
CTSsTi17: 


§ § PPPOE EEORLOEADOO4OOOOO64000600000460600000060000000000000000000008 

s*TEST 15 TEST THAT PARITY ERRORS BLOCKED BY NXM ABORT 

§ § OOSEOSOOOSO4ESERE1E4OO640006460000000600000000000000000000000008 

sCHECK PARITY ABORTS BLOCKED BY NON-EXISTENT MEMORY ABORT - THIS TEST ee. 

;VERIFY THAT IF A PARITY ERROR OCCURS ON THE SAME ADDRESS REFERENCE AS A 

sNON-EXISTENT MEMORY ERROR THAT THE CACHE DATA PATH GATE ARRAY BLOCKS THE 

sPARITY ERROR TO THE J-11 CHIP SET. THIS WILL BE DONE BY USING THE weet 

sBIT TO CAUSE A PARITY ERROR IN A CACHE REFERENCE THAT DOES NOT HAVE A 
sCORRESPONDING ADDRESS IN MAIN MEMORY. THE ADDRESS WILL THEN BE READ CAUSING 

;BOTH A CACHE PARITY ERROR AND A NON-EXISTENT MEMORY ERROR. TO AVOID HAVING 

3TO SIZE THE ENTIRE MEMORY TO FIND A NON-EXISTENT MEMORY ADDRESS THIS TEST 

sWILL USE THE LARGEST NON-I/0 ADDRESS (17757776). THE TEST WILL FIRST READ 

sTHIS ADDRESS AND IF A NXM TRAP OCCURS THE TEST WILL BE DONE. IF THE ACCESS 

3T0 THIS ADDRESS DOES NOT TRAP THEN THE TEST WILL BE SKIPPED. 

é 


F4 


GLOBAL. AREAS MAC111 30A(1052) O04-APR-84 10:38 PAGE 44 SEQ 0044 
KDJ11A.MAC O3-APR-84 11:36 T15 TEST THAT PARITY ERRORS BLOCKED BY NXM ABORT 

2029 ;BGNTST 

2030 ;SAVE CONTENTS OF VECTOR 4 

2031 ;SAVE CONTENTS OF VECTOR 114 

2032 sLET VECTOR 4 POINT TO CONTINUE TESTING (A:) 

2035 ;LET PAR6 #177400 

2034 sACCESS ADDRESS 157776 (PHYSICAL 17757776) 

2035 ;IF NO TRAP THEN 

2036 3. GOTO ENDTST 

pe _— 

2039 ;SET DIAGNOSTIC AND WRITE WRONG PARITY BITS IN CCR 

2040 sWRITE ADDRESS 157776 

2041 ;CLEAR CCR 

2042 ;SET PARITY ERROR ABORT BIT IN CCR 

2043 sLET VECTOR 4 POINT TO CONTINUE TESTING (B:) 

2044 sLET VECTOR 114 ad TO NXM-PARITY ERROR ROUTINE 

2045 sREAD ADDRESS 157776 

2046 nag NO TRAP THEN 

2047 ERROR IN CACHE SYSTEM 

2048 SENDIF 

2049 36; 

2050 ;CLEAR CCR 

2051 sRESTORE CONTENTS OF VECTOR 114 

2052 sRESTORE 5 lami OF VECTOR 4 

2053 sEXIT TST 

2054 ; 

2055 3 

2056 sNXM-PARITY ERROR ROUTINE: RESET STACK AFTER TRAP 

2057 : ERROR IN CACHE SYSTEM 

2058 : GOTO B: 

2059 sENDTST 

2060 5 5 FOOOO4OO0O46 065664666046066666006646606000466066000660006000000004004640% 

2061 005316 TST15: 

2062 005316 005267 173462 INC $TESTN ; INCREMENT TEST NUMBER 

2063 005322 013704 000004 MOV @04 ,R4 ;SAVE CONTENTS OF VECTOR 4 

2064 005326 013767 000114 173474 MOV 8114, SLOCOO sSAVE CONTENTS OF VECTOR 114 

2065 0053 012737 005372 000004 MOV 13, 804 sLET VECTOR 4 POINT TO CONTINUE TESTING 

2066 005342 012767 177400 165004 MOV #177400 ,KIPAR6 ;LET PAR6 = OFFSET TO HIGHEST MEMORY 

2067 005350 012767 000020 165140 MOV @20,SR5 sENABLE 22 BIT ADDRESSING. 

2068 005556 052737 000001 177572 BIS #BI TOO ,@e@SRO sENABLE MMU 

2069 005364 005737 157776 TST 80157776 sACCESS ADDRESS 17757776 

2070 005370 35 BR 3$ 3IF IT DOESN'T TRAP THEN SKIP THIS TEST 

2071 005372 706 000004 1$: ADD 04, sRESET STACK AFTER TRAP 

2072 005376 012767 000102 172342 MOV #102, cc :SET DIAG. AND WRITE WRONG DATA PARITY BITS 

2073 005404 37 157776 CLR 80157776 ;sWRITE TO ADDRESS 17757776 

2074 005410 012767 000200 172330 MOV @ * CCR ;CLEAR CCR AND SET PARITY ABORT BIT 

2075 005416 012737 005460 000004 MOV @2%, Bad sLET VECTOR 4 POINT TO CONTINUE TESTING 

2076 005424 012737 005446 000114 MOV 0100$ ,80114 ee VECTOR 114 POINT TO ERROR ROUTINE 

2077 005432 005737 157776 TST 80157776 READ ADDRESS 17757776 (SHOULD TRAP) 

2078 005436 104000 ERROR FALL ERRORS TO TRAP TO EMT VECTOR 

2079 005440 50 -WORD 50 sUNIQUE ERROR NUMBER 

2080 005442 001325 -WORD ERRMSG sADDRESS OF ERROR MESSAGE 

2081 ;CACHE SYSTEM ERROR 

2082 005444 000407 BR 3$ 3GO EXIT TEST 

2083 005446 005067 172120 100$: CLR SRO ;TURN OFF MIU BEFORE ERROR 

2084 005452 104000 ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 


G4 


GLOBAL AREAS MACY11 30A(1052) 04-APR-84 10:38 PAGE 45 SEQ 0045 
KDJ11A.MAC 03-APR-84 11:36 T1i5 TEST THAT PARITY ERRORS BLOCKED BY NXM ABORT 
2085 005454 000051 .WORD 51 ;UNIQUE ERROR NUMBER 
2086 005456 001325 .WORD ERRMSG sADDRESS OF ERROR MESSAGE 
2087 ;CACHE SYSTEM ERROR 
2088 005460 062706 000004 2s: ADD 04, SP sRESET STACK AFTER TRAP 
2089 005464 005067 172256 3$: CLR CCR ;CLEAR CCR FOR EXIT 
2090 005470 010437 000004 MOV R4, 904 sRESTORE VECTOR 4 
2091 005474 016737 173330 000114 MOV SLOCOO, 80114 sRESTORE VECTOR 114 
2092 005502 005067 172064 CLR SRO ;TURN OFF MMU BEFORE EXITING. 
2093 005506 005037 177744 CLR BOMSER sCLEAR THE MEM SYS ERROR REG 
2094 005512 005037 177766 CLR BOCPEREG sCLEAR THE CPU ERROR REGISTER 
2095 005516 005037 001116 CLR @OSOF TER sCLEAR THE SOFT ERROR COUNT 
2096 005522 000167 000000 JMP TST16 ;JUMP OVER DATA TABLES OR SUBROUTINES 
2097 ;TO NEXT TEST 
2098 
2099 
2100 
2101 005526 CTST2o: 
2102 8 § FSSSASASAAASRESESALALASAGESALASEAEEEEAARAREEAALEREREARARAREEEERERE 
2103 ;@TEST 16 TEST MULTIPROCESSING INSTRUCTIONS 
2104 3S Ss PPASSASSSSSAASEASASEASAALAAAEARAAAAALAEALARSEAEBEAAESEEREEEEEEAES 
2105 sMULTIPROCCESSING INSTRUCTION TESTS - THIS TEST WILL VERIFY THAT THE MULTI- 
2106 sPROCCESSING INSTRUCTIONS DO A BYPASS OF THE CACHE. THIS TEST WILL NOT VERIFY 
2107 3; THE REST OF THE FUNCTIONALITY OF THESE INSTRUCTIONS BECAUSE THAT WILL ALREADY 
2108 sHAVE BEEN CHECKED IN THE BASE INSTRUCTION TESTS. 
2109 sTHE TEST FOR TSTSET AND WRILCK WILL FIRST ALLOCATE AN ADDRESS IN CACHE WITH 
2110 sKNOWN DATA, THEN FORCE CACHE MISS WILL BE ENABLED AND THE SAME ADDRESS WILL 
2111 ;BE WRITTEN WITH WITH DIFFERENT DATA. THIS WILL SET UP CACHE WITH DATA 1 AND 
2112 sIT‘S ASSOCIATED MEMORY LOCATION WITH DATA 2. FORCE CACHE MISS WILL THEN BE 
2113 sDISABLED AND THE TSTSET/WRTLCK INSTRUCTION WILL BE EXECUTED. THIS INSTRUCTION 
2114 sWILL CAUSE CACHE TO BE BYPASSED AND AN ACCESS TO MAIN MEMORY WILL BE MADE. IN 
2115 sADDITION THIS INSTRUCTION WILL CAUSE CACHE TO BE RE-ALLOCATED WITH THE CORRECT:DATA. 
2116 ;THE TEST FOR ASRB INSTRUCTION DIFFERS SLIGHTLY. FIRST THE CACHE WILL BE 
2117 sALLOCATED, THEN AN ASRB INSTRUCTION WILL BE DONE AT THAT ADDRESS. 
2118 3A HIT SHOULD BE RECORDED ON THE ACCESS. NEXT, THE ADDRESS WILL BE READ AND 
2119 3A MISS SHOULD BE RECORDED BECAUSE THE FORCED BYPASS ON THE ASRB INSTRUCTION 
2120 :SHOULD HAVE INVALIDATED THE CACHE ENTRY, ANO BECAUSE IT’S A BYTE WRITE; CACHE 
2121 sWILL NOT BE RE-ALLOCATED. 
2122 : *eeeeNOTEsacee 
2123 sIF THE TSTSET OR WRILCK ISTRUCTIONS ARE ASSEMBLED SO THAT BIT 
2124 35-0 OF THE ADDRESS OF THE INSTRUCTION FOLLOWING THE TSTSET/WRTLCK INSTRUCTION 
2125 ;ARE EQUAL TO BITS 5-0 OF THE TSTLOC ADDRESS THE TEST WILL FZIL. THIS IS CAUSED 
2126 ;BY THE NEED OF AN ADDITIONAL FETCH WHEN THE PRE-FETCH BUFFER IS INVALIDATED 
2127 ;WHEN BITS S-O OF AN ADDRESS WRITTEN TO ARE EQUAL TO BITS S-C OF THE ADDRESS 
2128 ;IN THE PREFETCH BUFFER. THE ADDITIONAL FETCH CAUSES THE REQUIRED DATA TO BE 
2129 sSHIFTED OUT OF THE RANGE OF THE HIT/MISS REGISTER. PADDING THE FRONT OF THE 
tty ht Bi NOPS MAY BE REQUIRED TO REMEDY THIS PROBLEM. 
° 
2132 sREAD TEST LOCATION TO ALLOCATE CACHE 
2133 300 TSTSET INSTRUCTION 
2134 ;IF HIT/MISS REGISTER BIT 3 NOT SET THEN 
2135 ‘i ERROR IN CACHE SYSTEM 
2136 3 ENDIF 
2137 ;READ TEST LOCATION 
2138 ;IF HIT/MISS REGISTER BIT 3 SET THEN 
2139 RROR IN CACHE SYSTEM 


3. 
2140 sENDIF 


AREAS 


GL OBA: 
KDJI1A. MAC 


os Ash de Som 4952) 04 - ano 


012767 


005037 


022767 
001015 


032767 


173252 
173364 


000004 
177777 
177746 


177777 


000020 


005532 
173762 


172202 
001122 


172160 
001120 


173270 


172110 
001120 


H4 


10: 
Test” HUL TIPROCESSING INSTRUCTIONS 


sREAD TEST LOCATION TO ALLOCATE CACHE 
3D0 WRILCK INSTRUCTION 
sIF HIT/MISS REGISTER BIT 3 NOT SET THEN 


$. ERROR IN CACHE SYSTEM 
sENDIF 
sREAD TEST LOCATION 


:;IF HIT/MISS REGISTER BIT 3 SET THEN 
ERROR 


3. IN CACHE SYSTEM 
s ENDIF 


sREAD TEST LOCATION TO ALLOCATE CACHE 


:D0 ASRB INSTRUCTION 


IF HIT/MISS REGISTER BIT 3 NOT SET THEN 


§ FE MSESAREAASSAASESSASAAALASLASEEESAEAEAARALEAELAREARERABRERSERESALALRE RS 


ts ERROR IN CACHE SYSTEM 
sENDIF 
sREAD TEST LOCATION 
;IF HIT/MISS REGISTER BIT 3 SET THEN 
Ke ERROR IN CACHE SYSTEM 
;ENDIF 
sENDTST 
TST16: 
INC $TESTN 
CLR TSTLOC 
MOV #BITO2],.CCR 
MOV #177777 .@eéTSTLOC 
CLR 8eCCR 
3 TSTSET TSTLOC 
. WORD 7237 
. WORD TSTLOC 
BEQ 100$ 
BIT @BITOS .HITMIS 
BNE i$ 
MOV @TST16+4 , BOSOF TRE 
JSR PC ,APTSFT 
ERROR 
-WORD 52 
-WORD ERRMSG 
BR i$ 
100$: 
ERROR 
-WORD 53 
-WORD ERRMSG 
1%: CMP #177777, TSTLOC 
BNE 200% 
BIT 6BITO4, HITMIS 
BNE 2$ 
MOV TS1T16+4,@0@S0F TRE 
JSR PC ,APTSFT 
ERROR 
. WORD 54 


; INCREMENT TEST NUMBER 
sWRITE TEST LOCATION TO ALLOCATE CACHE 
sSET CACHE TO FORCE MISS 
sWRITE TO MEMORY BUT NOT TO CACHE. 
sCACHE=000000; TSTLOC=177777 
;CLEAR FORCE MISS 
3D0 TSTSET INSTRUCTION 
;THESE NEXT TWO LOCATIONS ARE THE TSTSET 
sINSTR. BECAUSE THE ASSEMBLER WAS NOT READY 
:;IF = O THEN CACHE WAS NOT BYPASSED 
IF HIT/MISS REGISTER BIT 5S IS SET 
; THEN GO TO NEXT TE 
;MOVE RETRY ADDRESS TO SOFT RETURN 
:GO TO SOFT ERROR SUBROUTINE 
sALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 
;CACHE SYSTEM ERROR 
sERROR! BIT 5 IN. HIT MISS REG WAS NOT SET. 
sRECOVER FROM ERROR 


;ALL ERRORS TO TRAP TO EMT VECTOR 
s UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 
sERROR! CACHE WAS NOT BYPASSED By TSTSET 


sREAD TEST LOCATION CALSO ALLOCATES CACHE FOR wh 


3 CACHE —s BE oY a eaeece WITH 
3177777 AS A RESULT OF TSTSET INSTRUCTION. 
— oe REGISTER BIT 4 SET (SHOULD BE) 


; MOVE RETRY ADDRESS TO SOFT RETURN 
3GO TO SOFT ERROR SUBROUTINE 

sALL ERRORS TO TRAP TO EMT VECTOR 
; UNIQUE ERROR NUMBER 


SEQ 9046 


14 


GLOBAL AREAS MACY11 7M 1952) 04-APR-84 10:38 PAGE 47 SEQ 0047 
KDJ11A.MAC 03-APR-84 11: T16 TEST MULTIPROCESSING INSTRUCTIONS 
2197 005662 001325 -WORD ERRMSG sADDRESS OF ERROR MESSAGE 
2198 isCACHE SYSTEM ERROR 
2199 005664 000403 BR 2s sRECOVER FROM ERROR 
2200 005666 200$ : 
2201 005666 104000 ERROR sALL ERRORS TO TRAP TO EMT VECTOR 
2202 005670 000055 -WORD 55 sUNIQUE ERROR NUMBER 
2203 005672 001325 -WORD ERRMSG sADDRESS OF ERROR MESSAGE 
2204 ;CACHE SYSTEM ERROR 
2205 sERROR! CACHE WAS NOT RE-ALLOCATED 
2206 005674 012767 000004 172044 23: MOV #BITO2],.CCR sSET FORCE CACHE MISS. 
2207 005702 005067 173214 CLR TSTLOC ry “lle TSTLOC =000000 
2208 005706 005000 CLR 0 ;CLR RO 
2209 005710 005067 172032 CLR CR sCLEAR FORCE CACHE MISS. 
2210 ; WRTLCK TSTLOC ;00 WRTLCK INSTRUCTION 
2211 005714 007337 . WORD 337 ; THESE NEXT TWO WORDS ARE THE WRTLCK 
2212 005716 001122 -WORD TSTLOC sINSTR. BECAUSE THE ASSEMBLER WAS NOT READY 
2213 005720 001015 BNE 300% : 
2214 005722 032767 000040 172022 BIT @BITOS, HITMIS ;IF HIT/MISS REGISTER BIT 5S NOT SET 
2215 005730 001014 BNE 3$ ; THEN 
2216 005732 012737 005532 001120 MOV @TST16+4, @@SOF TRE :MOVE RETRY ADDRESS TO SOFT RETURN 
2217 005740 004767 173674 JSR PC ,APTSFT ;GO TO SOFT ERROR SUBROUTINE 
2218 005744 104000 ERROR sALL_ ERRORS TO TRAP TO EMT VECTOR 
2219 005746 -WORD S6 s UNIQUE ERROR NUMBER 
2220 005750 001325 -WORD ERRMSG sADDRESS OF ERROR MESSAGE 
2221 ;CACHE SYSTEM ERROR 
2222 005752 000403 BR 3$ sRECOVER FROM ERROR 
2223 005754 300$: 
2224 005754 104000 ERROR sALL ERRORS TO TRAP TO EMT VECTOR 
2225 005756 000057 -WORD 57 sUNIQUE ERROR NUMBER 
2226 005760 001325 -WORD ERRMSG sADDRESS OF ERROR MESSAGE 
2227 sCACHE SYSTEM ERROR 
2228 sERROR! CACHE WAS NOT BYPASSED BY WRILCK. 
2229 005762 005767 173134 3$: TST a = TEST LOCATION 
2230 005766 001015 BNE 
22351 005770 032767 000020 171754 BIT eartos, HITMIS TF HIT/MISS REGISTER BIT 4 SET 
2232 005776 001014 BNE THEN 
2233 012737 005532 001120 MOV eTST16+4, @eSOF TRE s MOVE RETRY ADDRESS TO SOFT RETURN 
2234 006006 004767 173626 JSR SAPTSFT sGO TO SOFT ERROR SUBROUTINE 
2235 006012 104000 ERROR sALL ERRORS TO TRAP TO EMT VECTOR 
2236 006014 -WORD 60 sUNIQUE ERROR NUMBER 
2237 006016 001325 ‘ ERRMSG sADDRESS OF ERROR MESSAGE 
2238 ;CACHE SYSTEM ERROR 
2239 006020 000403 BR A$ ;RECOVER FROM ERROR 
2240 006022 400$: 
2241 006022 104000 ERROR sALL ERRORS TO TRAP TO EMT VECTOR 
2242 006024 1 -WORD 61 sUNIQUE ERROR NUMBER 
2243 006026 001325 -WORD ERRMSG sADORESS OF ERROR MESSAGE 
2244 ;CACHE SYSTEM ERROR 
2245 sERROR! CACHE WAS NOT RE-ALLOCATED 
2246 006030 005767 173066 4$; TST TSTLOC sREAD TEST LOCATION TO ALLOCATE CACHE 
2247 006034 000240 NOP sNOP PAD FOR ASRB HIT/MISS CALC 
2248 006036 106267 173060 ASPB TSTLOC :0D0 ASRB INSTRUCTION 
2249 006042 032767 000020 171702 BIT @BITO4, HITMIS sIF HIT/MISS REGISTER BIT 4 NOT SET 
2250 006050 001010 BNE S$ ; THEN 
2251 006052 012737 005532 001120 MOV ae ab tart SeSOF TRE sMOVE RETRY ADDRESS TO SOFT RETURN 
2252 006060 004767 173554 JSR PC, APTSFT :GO TO SOFT ERROR SUBROUTINE 


J4 


GLOBAL AREAS ene 30AC1052) 04-APR-84 10:38 PAGE 48 SEQ 0048 
KDJ11A.MAC O3-APR-84 11:36 T16 TEST MULTIPROCESSING INSTRUCTIONS 

2253 006064 104000 ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 

2254 006066 000062 -WORD 62 ;sUNIQUE ERROR NUMBER 

2255 006070 001325 -WORD ERRMSG sADDRESS OF ERROR MESSAGE 

2256 = SYSTEM ERROR 

2257 006072 005767 173024 5$: TST TSTLOC sREAD TEST LOCAT 

2258 006076 032767 000010 171646 BIT @BITOS, HITMIS 44 HIT/MISS REGISTER BIT 3 SET 

2259 006104 001410 BEQ 6$ THEN 

2260 006106 012737 005532 001120 MOV @TST16+4, SOF TRE ; MOVE RETRY ADDRESS TO re RETURN 

2261 006114 004767 173520 JSR PC .APTSFT sGO TO SOFT ERROR SUBROUTINE 

2262 006120 104000 ERROR sALL ERRORS TO TRAP TO EMT VECTOR 

2263 006122 000063 -WORD 63 sUNIQUE ERROR NUMBER 

2264 006124 001325 .WORD ERRMSG sADDRESS OF ERROR MESSAGE 

2265 ;CACHE SYSTEM ERROR 

2266 006126 6%: 

2267 006126 005037 177744 CLR @OMSER ;sCLEAR THE MEM SYS ERROR REG 

2268 006132 005037 177766 CLR GeCPEREG ;CLEAR THE CPU ERROR REGISTER 

2269 006136 005037 001116 CLR @eSOF TER ;CLEAR THE SOFT ERROR COUNT 

2270 006142 000167 JMP TST17 ; JUMP OVER DATA TABLES OR SUBROUTINES 

2271 ;TO NEXT TEST 

2272 

2275 

2274 

2275 006146 cTsTei: 

2276 FF PEASAAAASSAOHASEHEEASEREAREAASEAAEEAEESAREDEAEAREAEDEREEREEEEEES 

2277 s*#TEST 17 TEST CACHE DATA RAMS 

2278 § FPSSASSELASSEAASEASEAEEASAEEESEEDEEEEDACEEREREEEDEEEEEEDEEDEDEDDS 

2279 ;DATA STORE RAM TESTS - THERE ARE TWO TESTS FOR THE DATA STORE RAM. 

2280 :;THE FIRST TEST WILL BE A NO DUAL ADDRESSING TEST AND THE SECOND 

2281 ;TEST WILL BE A DATA RELIABILITY TEST. THE NO DUAL ADDRESSING TEST 

2282 sWILL FIRST WRITE E WORD OF THE CACHE RAM WITH ITS WORD ADORESS 

2283 sAND VERIFY THE CONTENTS WITH A READ OF EACH ADDRESS. THEN EACH 

2284 ;sBYTE WILL BE WRITTEN WITH ITS ADDRESS _ CHECKED. THE DATA 

oaee ‘name enaiade TEST THAT WILL BE USED IS A TEST CALLED MOVING INVERSIONS. 

2287 ;BGNTST i 

2288 geet MMU REGISTERS TO HAVE BYPASS ON KERNAL SPACE AND NO 

2289 BYPASS ON USER SPACE 

Soar iLET PS EQUAL KERNAL FOR CURRENT MODE AND USER FOR PREVIOUS 

2292 ;ENABLE MMU 

2293 ;GET FIRST ADDRESS yA ee WORD DATA BUFFER 

2294 sCLEAR DATA TO BE WRITTEN 

2295 ;SET DIAGNOSTIC BIT (aitei>) IN CCR 

2296 :00 UNTIL DATA TO —t WRITTEN EQUALS 20000(8) 

2297 3. WRITE DATA TO ADDRESS 

2298 o. ADD 2 TO ADDRESS 

2299 3. ADD 2 TO DATA TO BE WRITTEN 

2300 sENDDO 

2301 sSAVE CONTENTS OF VECTOR 114 

2302 s;LET VECTOR 114 POINT TO DATA STORE PARITY ABORT ROUTINE 

2505 sGET FIRST ADDRESS OF 4K WORD DATA BUFFER 

2304 ;CLEAR EXPECTED DATA 

2305 300 UNTIL EXPECTED DATA EQUALS 20000(8) 

2306 3. READ ADDRESS 

2307 i. IF RECEIVED DATA NE EXPECTED DATA THEN 

2308 3. ERROR IN CACHE SYSTEM 


GLOBAL 
KDJL1A.MA 


ie 
171472 


177752 
001120 


IK4 
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T17 TEST CACHE DATA RAMS 
te ENDIF 

Bs ADD 2 TO EXPECTED DATA 
Re ADD 2 TO ADDRESS 


;ENDDO 

:GET FIRST ADDRESS OF 8K Phe DATA BUFFER 
sCLEAR DATA TO BE WRITTEN 

300 UNTIL ALL BYTES CHECKED 


3. WRITE DATA TO ADDRESS 
3. ADD 1 TO ADDRESS 
3. ADD 1 TO DATA TO BE WRITTEN 


;ENDDO 

;GET FIRST ADDRESS OF 8K BYTE DATA BUFFER 
;CLEAR EXPECTED DATA 

300 UNTIL EXPECTED DATA EQUALS 20000(8) 
3. READ ADDRESS 


S- IF RECEIVED DATA NE EXPECTED DATA 
Bs ERROR IN CACHE SYSTEM 

Bs ENDIF 

i ADD 1 


TO EXPECTED DATA 
3. ADD 1 TO ADDRESS 


;ENDDO 
sRESTORE VECTOR 114 
sENDTST 


THEN 


5 
SF POSSESASSESESESASEASESEEADLAEEAEASLESASESCASALEEOAEREEEAEAESHAEELARAEES 


SEQ 9049 


TST17: . 
, INC $TESTN ; INCREMENT TEST NUMBER 
JSR PC, INI TMM sSETUP MMU REGISTERS/FORCE CACHE BYPASS PAGES O- 
MOV #1600, KIPAR6 ;LET PAR6 MAP TO ADDRESS 160000 
BIC #BITO2,.SR3 ;DISABLE KERNEL D SPACE 
BIS #BITOO, ; TURN ON MEMORY MANAGEMENT 
MOV #140000 ,R2 SGET FIRST ADDRESS OF 4K WORD BUFFER 
CLR Ri ;INIT DATA TO BE WRITTEN 
BIS ©BIT01,.CCR ;SET OIAGNOSTIC BIT 
$: CMP Ri, ;D0 UNTIL ALL ADDRESSES WRITTEN 
BEQ 2s ;IF DONE GO CHECK DAT 
MOV Ri, (R2)-+ S WRITE DATA TO ADDRESS 
= 4% Ri fo only DATA BY 2 CWORD BOUNDARY ) 
2$: MOV 80114, SLOCOO ; SAVE CONTENTS OF VECTOR 114 
MOV @RAMPAR ,80114 sLET VECTOR 114 POINT TO ABORT ROUTINE 
Bic #BITO1, ccR ;CLEAR DIAGNOSTIC BIT. ALL FURTHER 
;sREFERENCES TO PAGE 6 SHOULD BE CACHED. 
MOV #140000 ,R2 ;GET FIRST ADDRESS OF 4K WORD BUFFER 
CLR Ri :INIT DATA TO BE CHECKED 
3$: CMP Ri, #20000 300 UNTIL ALL ADDRESSES CHECKED 
BEQ S$ ;IF OONE GO DO BYTES 
TST (R2) sCHECK THAT CACHE WAS 
BIT OBITOS ,.QOHITMIS sALLOCATED 
BNE 4$ ;SHOULD HAVE HIT 
MOV @TST17+4,80SO0F TRE ;MOVE RETRY ADDRESS TO SOFT RETURN 
JSR PC, APTSFT :GO TO SOFT ERROR SUBROUTINE 
sCACHE SYSTEM ERROR 
sEXPECTED A HIT; GOT A MISS 
ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
.WORD 64 ;UNIQUE ERROR NUMBER 


GLOBAL AREAS 
KDJ11A.MAC 


MACY11 30A(C 1052) 
03-APR-84 11:36 


000002 


000002 
140000 


020000 


000001 
140000 


000010 


006152 
173204 


172370 
172364 


006152 
173152 


04 - APR -84 


177746 


177752 


001120 


001120 


000114 


T1i7 


4$: 


100$: 


5$: 


6$: 


7$: 


101$: 


9$: 


10$: 


10:38 


ADD 
BR 
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PAGE 50 
TEST CACHE DATA RAMS 


ERRMSG 


(R2)+, RECDAT 
Ri, RECDAT 
100$ 

65 

ERRMSG 

#2,R1i 

3$ 


3;*#aNOW CHECK BYTESseae 
;SINCE CACHE IS ALREADY ALLOCATED; _s BYTES WILL HIT 
sAND WRITE THROUGH CACHE TO MEMORY 


#6IT01,aeCCR 
a 


ht #20000 

$ 

Rl, CR2)+ 
Ri 


6$ 

#140000 ,R2 

R1 

(Re) 
@BITOS,SeHITMIS 
101% 


@TST17+4, @OSOF TRE 
PC ,APTSFT 


ERRMSG 
CR2)+, RECDAT 
rif RECDAT 


S 
@TST17+4,@@SOF TRE 
PC .APTSFT 


67 
ERRMSG 


SLOCOO, 80114 
@eMSER 


@OCPEREG 
Q@eSOF TER 
TST20 


SEQ 9050 


;ADDRESS OF ERROR MESSAGE 
;sREAD TEST LOCATION 
a DATA NOT EQUAL TO EXPECTED 
; 
;ALL ERRORS TO TRAP TO EM: VECTOR 
; UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 
;CACHE SYSTEM ERROR 
; UPDATE EXPECTED. DATA Br 2 
;ENDDO 


;SET DIAGNOSTIC MODE IN CCR 

;GET FIRST ADDRESS OF 4K WORD BUFFER 
s;INIT DATA TO BE WRITTEN 

300 UNTIL ALL ADDRESSES WRITTEN 

;IF DONE GO CHECK DATA 

;WRITE DATA TO ADDRESS 

;UPDATE DATA BY 1 CBYTE BOUNDARY) 


; 

sGET FIRST ADDRESS OF 4K WORD BUFFER 
;INIT DATA TO BE CHECKED 

300 UNTIL ALL ADDRESSES CHECKED 
{SHOULD BE CACHE WAS ALLOCATED 


, 
A HIT 

; MOVE RETRY ADDRESS TO SOFT RETURN 
;GO TO SOFT ERROR SUBROUTINE 

sCACHE SYSTEM ERROR 

sEXPECTED A HIT; GOT A MISS 
;ALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 
sADORESS OF ERROR MESSAGE 
sREAD TEST LOCATION 
—o DATA NOT EQUAL TO EXPECTED 


sMOVE RETRY ADDRESS TO SOFT RETURN 
:GO TO SOFT ERROR SUBROUTINE 
;ALL ERRORS TO TRAP TO EMT VECTOR 
s UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 
sCACHE SYSTEM ERROR 
sUPDATE EXPECTED DATA By 1 
IF ALL ADDRESS eee” BEEN TESTED 


; MMU 

sRESTORE VECTOR 114 

;CLEAR THE MEM SYS ERROR REG 

<PU ERROR REGISTER 

‘» SOFT ERROR COUNT 

; JUMP OVin DATA TABLES OR SUBROUTINES 


GLOBAL AREAS 
KDJ11A.MAC 


MACY11 30A( 1052) 
03-APR-84 11:36 


M4 


T17 TEST CACHE DATA RAMS 


04-APR-84 10:38 PAGE 51 


;TO NEXT TEST 
CTST22: 


$3 SESSSESEESESESASESSEEADEBESEEBASEASESLALESESEEAKE CARRE DEAASOELEAEEDSE 

;4TEST 20 CACHE DATA RAM DATA RELIABILITY TEST 

§ i FPRSEOAOEEESEO4E44EE44E46644660640044666460060600004664600600460464000044446 

sMOVING INVERSIONS TEST FOR DATA RAMS - THE TEST IS STARTED AFTER LOADING THE 
s;RAM STORE WITH 0'S. EACH ADDRESS IS READ AND VERIFIED TO BE ALL O'S. THEN A 
31 IS SUBSTITUTED IN A BIT POSITION AND THE NEW WORD IS WRITTEN. NEXT THE 
sADDRESS IS READ TO VERIFY THE NEW CONTENTS. THIS IS REPEATED FOR EACH BIT OF 
;THE WORD LEAVING THE ARRAY FILED WITH 1'S. THE WHOLE PROCESS IS REPEATED 
sPLUGGING IN 0'S TO THE 1'S AND REPEATED TWICE MORE ADDRESSING IN THE DOWNWARD 
sDIRECTION. FINALLY EVERYTHING IS REPEATED FOR EACH BIT POSITION BEING THE 
;LSB. TO SAVE TIME AND KNOWING THE LAYOUT OF THE RAM CHIPS INSTEAD OF DOING 
sONLY A SINGLE BIT AT A TIME EVERY FOURTH BIT WILL BE DONE CONCURRENTLY. 


; 
;BGNTST 

;SETUP AND ENABLE MMU 

;SETUP CCR TO ABORT PARITY ERRORS 
;CLEAR CACHE 


3:00 UNTIL ADDLSB EQ #0 

i. LET CURDAT = 0 

LET RITEDA = $1 

LET NEWDAT = #1 

IF FWOSEQ = #1 THEN 

‘ LET FSTADD EQUAL FIRST ADDRESS OF 8K BYTE GUFFER 
‘ LET LASTAD EQUAL LAST ADDRESS OF 8K BYTE BUFFER 


ELSE 
: : LET FSTADD EQUAL LAST ADDRESS OF 8K BYTE BUFFER 
: AR LET LASTAD EQUAL FIRST ADDRESS OF 8K BYTE BUFFER 
; LET CURADD = FSTADD 
) LET OCOUNT = 20 


SAVE CONTENTS OF VECTOR 114 

LET VECTOR 114 POINT TO DATA STORE PARITY ABORT ROUTINE 
DO UNTIL DCOUNT EQ #10 

. LET RECDAT = @CURADD 

‘ IF RECDAT NE CURDAT THEN 

ERROR IN CACHE SYSTEM 

IF OCOUNT GT @3 THEN 

° LET @CURADD = ACURADD CLEARBY RITEDA 


= 


: : ELSE 

rf LET @CURADD = SCURADD SETBY RITEDA 
: : ENOIF 

: ; LET RECDAT = @CURADD 


. IF RECDAT NE NEWDAT THEN 
ERROR IN CACHE SYSTEM 
‘ ENOIF 


IF CURADD EQ LASTAD THEN 

e IF RITEOA = #210 THEN 

° ‘ - ‘ IF DCOUNT NE @7 THEN 

: ‘ ; ‘ ‘ LET CURDAT = #377 
, . ° ° LET RITEDA = #21 


SEQ 0051 


N4 


RDGT IA. AA - 03 APR Batiste 04 -APR $9 10: BR cHE BATA RAM DATA RELIABILITY TEST oe Te 


2477 Ss . a : : LET NEWDAT = #356 

2478 Ze . . ENDIF 

2479 t< ‘ ELSE 

2480 t. 5 , LET CURDAT = NEWDAT 

2481 Be ‘ ROTATE RITEDA 

2482 Ss . “ ; IF DCOUNT GT #3 THEN 

2483 aa e ‘ . . LET NEWDAT = NEWDAT CLEAREDBY RITEDA 
2484 Se ‘ ‘ ; ELSE 

2485 Se 3 . LET NEWDAT = NEWDAT SETBY RITEDA 
2486 ee . ENDIF 

2487 Sa ‘ ENDIF 

2488 3. ‘. ’ INCREMENT DCOUNT 

2489 S si : LET CURADD = FSTADD 

2490 es ‘ ELSE 

2491 Bs ‘ ‘ ¥ FWOSEQ = #1 THEN 

2492 Ee : LET CURADD = CURADD + ADDLSB 

2493 Ps ; IF CARRY THEN 

2494 o. ‘ 4 : LET CURADD = CURADD + #1 

2495 Bs ; . ENDIF 

2496 Se : ELSE 

2497 oe A ‘ LET CURADD = CURADD - ADDLSB 

2498 36 , - CARRY THEN 

2499 Ss ‘ LET CURADD = LASTAD - ADDLSB 
2500 f. ‘ ; ; LET CURADD = CURADD - #1 

2501 36 ; ‘ ENDIF 

2502 We . ENDIF 

2503 ee ENDIF 

2504 e E 

2505 Se IF FWOSEQ EQ #1 THEN 

2 $4 . LET FWOSEQ = #0 

2507 is ELSE 

2508 ‘; ‘ ROTATE ADDLSS 

2509 - . LET FWDSEQ = #1 

2510 oa ENDIF 

2511 ;ENDDO 

2512 sRESTORE VECTOR 114 

2513 ; pod il 

2514 CCURRENT ADDRESS) 

2515 :R1 “WORKING REGISTER 

2516 3R2=RE T CRECEIVED D 

2517 sR3=RITEDA CDATA TO Be WRITTEN) 

2518 ;R4=NEWDAT CEXPECTED ) 

2519 :RS=CURDAT CCURRENT DATA 

2520 $s SPRASESASESEEASASESEASAREEAEEAESEARESALESEEDAAEALEDARADLALDEDEEBES 

2521 006542 TST20: : 

2522 006542 00 7 172236 INC $TESTN s INCREMENT TEST NUMBER 

2523 006546 032777 001000 172272 BIT #BITO9,aSWR sARE DATA RELIABILITY TESTS SELECTED? 
2524 006554 001002 BNE 100$ ;IF BITOS IN SWR = 1; DO RELIABILITY TEST 
2525 006556 000167 000454 JMP EXTST sELSE SKIP IT 

2526 006562 004767 172624 100$: JSR PC, INI TMM ;SETUP MEMORY MANAGEMENT 

2527 sPAGES O THRU 5S BYPASS CACHE 
2528 sPAGES 6 AND 7 DON’T BYPASS CACHE 
2529 006 012767 000200 163560 MOV 200 , KIPAR6 sLET KIPAR6 RE-LOCATE TO 20000-37777 
2530 006574 052737 000001 177572 BIS @BITOO,a¢SRO ; TURN ON MMU 

2531 006602 052767 000200 171136 BIS 200, sENABLE PARITY ABORTS 

2532 006610 012700 140000 MOV #140000 ,RO 3-- 7 


GLOBAL AREAS 
KOJ11A.MAC 


MACY11 30A( 1052) 
0O3-APR-84 11:36 


012701 
005020 


010000 


000021 
000021 
172172 


140000 
157777 
157777 
140000 
172144 
172114 
000010 


04 -APR -84 
T20 


172174 
172170 


172156 
172152 


172106 


172062 


172014 


171762 


1%: 


TSTLUP: 


1$: 
2s: 


BGNTLP: 


2s: 
38: 


4%: 


5$: 


10:38 PAGE 53 
CACHE DATA RAM DATA RELIABILITY TEST 


B5 


#10000, Ri 
CRO) 


“1, FWOSEQ 
ol, ADDL SB 
80114, StLOcoo 
ORAMPAR , 80114 
R2 
RS 

21, R3 
#21, Ra 

WO 

i$ 
#140000 ..F STADD 
@157777,LSTADD 
es 
#157777,FSTADD 
©140000 ,LSTADD 
FSTADD, RO 

oC 

o8., DCOUNT 
ENOTL 

CRO) ,R2 

R2, RS 

is 

70 

ERRMSG 

o3, DCOUNT 
es 

RS, CRO) 
3$ 

RS, CRO) 
(RO) ,R2 

R2, R4 

4% 

71 

ERRMSG 

RO, LSTADD 
8$ 

#210, R3 

a7, OCOUNT 
7$ 

6377, RS 
@21, RS 
@356., R4 

7$ 

R4, RS 

R3 

63, DCOUNT 
6% 


3 a 
. <CLEGRENG CACHE 


init UPWARD ADDRESSING INDICATOR 

sINIT LSB AND DO LOOP UNTIL SHIFTED OuT 
sSAVE CONTENTS OF VECTOR 114 

sLET VECTOR oe TO ABORT ROUT INE 

s INIT RECDAT 

sINIT CURRENT DAT 

sINIT DATA TO BE WRITTEN 

sINIT EXPECTED DATA 

— UPWARD 


sLET FIRST ADDRESS EQUAL LOWEST VALUE 
sLET LAST ADDRESS EQUAL HIGHEST VALUE 


sELSE 
SLET FIRST ADDRESS EQUAL HIGHEST VALUE 
sLET LAST ADDRESS EQUAL LOWEST VALUE 
sLET CURRENT ADORESS EQUAL FIRST ADDRESS 
sINIT LOOP COUNTER 
300 LOOP & TIMES (4 TIMES TO WRITE 1'S 
sAND 4 TIMES TO oa BACK 00'S) 
sFIRST READ LOCATION 
sIF RECIEVED DATA NOT EQUAL TO EXPECTED 
sDATA THEN 
sALL ERRORS TO IRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 
sADORESS OF ERROR MESSAGE 

sCACHE SYSTEM ERROR 
aa COUNT GREATER THAN 3 


N 
;CLEAR TEST DATA BY WRITE DATA 
sELSE 
;SET TEST DATA BY WRITE DATA 
;D0 READ AFTER WRITE 
VIF RECIEVED DATA NOT EQUAL TO EXPECTED 
sDATA THEN 
sALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

sCACHE SYSTEM ERROR 

oa ADDRESS EQUALS LAST ADDRESS 


37 

sAND IF go PATTERN EQUALS LAST 
PATTERN T 

3AND TEST ts NOT ON LAST LOOP 

3 THEN 

sSET UP TO WRITE O'S 

sELSE 

3;SET UP FOR NEXT DATA PATTERN 
‘ IF DOWNWARD ADDRESSING 


THEN 
HLET NEW DATA BE CLEARED BY WRITE DATA 


SEQ 0053 


CS 


oP th. Ane AS 03 AbA ha P45 42> ee 10: RHE Bh R “Ran DATA RELIABILITY TEST 


te 


007102 


171746 
171766 


171746 


171742 
160000 


020000 
000001 


171716 
140000 


020000 
000001 


171670 


171662 
177446 
000001 
171646 
020000 


171650 
171640 


93: 


108: 
ENDTLP: 


18%: 


ENDLUP: CMP 


EXTST: 


CTstes: 


sELSE 

sLET NEWDAT BE SET By WRITE DATA 
sUPDATE LOOP COUNTER 

a FIRST ADDRESS FOR THIS PASS 


sELS 

v. “ADDRESSING UPWARD 

iT 

CALCULATE NEXT HIGHER ADDRESS 

sIF CURRENT ADDRESS HAS BEEN INCREASED 
sABOVE HIGHEST ADDRESS THEN 

sROLL ADDRESS BACK 


;sELSE 

sCALCULATE NEXT LOWER ADDRESS 

sIF CURRENT ADDRESS HAS — DECREASED 
sBELOW LOWEST ADDRESS THE 

sROLL ADDRESS BACK 


sENODO 
1TF_ ADDRESSING UPWARD FINISHED 
300 ADDRESSING DOWNWARD 


sSET ADDRESSING UPWARD INDICATOR 
sUPDATE LSB TO NEXT POSITION 

sWE ONLY GO AS FAR AS 10000 
sENODO 


sRESTORE VECTOR 114 

sINIT CCR FOR EXIT 

;TURN OFF MMU 

;CLEAR THE MEM SYS ERROR REG 

:CLEAR THE CPU ERROR REGISTER 

;CLEAR THE SOFT ERROR COUNT 

; JUMP OVER DATA TABLES OR SUBROUTINES 
3TO NEXT TEST 


8 8 9096666664646 6608680468 66600600060684600646000068 6646600000660 02000820006 


s*TEST 21 


wn TS AN ADDRESSING 


TAG RAM DUAL ADDRESS TEST 


8 8 OOOOS6608 008666066 666666060060660008606060606606840 6060004040406 00060888 


sTAG STORE RAM TESTS - THERE ARE TWO TESTS FOR THE TAG STORE RAMS. THE FIRST 


TEST TO ENSURE NO DUAL 


NG OF THE TAG STORE. 


ADORE SSI 
HE SECOND TEST IS A “GALLOPING ONES AND ZEROS” TEST THAT CHECKS THE DATA 
RELIABILITY OF THE TAG RAMS. 


ING TEST - THIS WILL BE 


DONE BY FIRST FLUSHING THE CACHE, THEN 


sDUAL ADORE 
+ THE FIRST 256(10) LOCATIONS (BLOCK 0) WILL BE WRITTEN WITH ADDRESSES THAT 
sWILL CAUSE A _ INCREMENTING PATTERN TO BE STORED IN THOSE LOCATIONS OF THE TAG 


sSTORE RAM. NEXT THE ENTIRE 4K ADDRESS 
sREGISTER SHOULD ONLY REPORT HITS ON THE oa hk tat THAT WERE ALLOCATEC. 
— WILL BE REPEATED FOR EACH BLOCK FOR A 


s INITIALIZE LOW ADDRESS 
NABL 


UP AND E 


3SET E MMU 
s INITIALIZE BLOCK COUNTER 


RANGE WILL BE READ. THE HIT/MISS 


THIS 
TOTAL OF 16 (10) BLOCKS. 


SEQ 9054 


D5 


GLOBAL AREAS __MA h APR. ' 
RDITIA.HAG os AbATAgSPRLER>2? 04 -APRGS 10:58, BAGELS appaess Test sea GOSS 

2645 UNTIL ALL BLOCKS TESTED (16 TIMES 

2646 fo NTT OSH CACHE AND SET OERGNOSTES BIT 

7 Se LET CURRENT ADDRESS = LOW ADDRESS 

2648 : i ae INITIALIZE ALLOCATION COUNTER 

2649 '. DO UNTIL ENTIRE BLOCK ALLOCATED (256 TIMES) 

2650 3. IF CURRENT ADDRESS < 32k THEN 

2651 “in ' , READ CURRENT ADDRESS 

2652 x ELSE 

2653 _ ' ; WRITE CURRENT ADDRESS 

2654 3. ‘ ENDIF 

2655 Sa UPDATE CURRENT ADDRESS (ALSO ADD 200 TO PAR) 

2656 3. ENDDO 

2657 “a INITIALIZE GOOD ADDRESS 

2658 ie INITIALIZE CURRENT ADDRESS 

2659 s INITIALIZE LOCATION COUNTER 

2660 i. SAVE CONTENTS OF VECTOR 114 

2661 . LET VECTOR 114 POINT TO TAG STORE PARITY ABORT ROUTINE 

2662 b. DO UNTIL ALL LOCATIONS CHECKED (256 TIMES) 

2663 i. INITIALIZE CHECK COUNTER 

2664 3. . DO UNTIL ADDRESS IN EACH BLOCK CHECKED 

2665 :. READ CURRENT ADDRESS 

2666 3. : ™ HIT THEN 

2667 _ IF CURRENT ADDRESS NE GOOD ADDRESS THEN 

2668 _ ERROR IN CACHE SYSTEM 

2669 :. , ENDIF 

2670 3. c ‘ ELSE 

2671 :. IF CURRENT ADDRESS EQUAL GOOD ADDRESS THEN 

2672 _ ERROR IN CACHE SYSTEM 

2673 ti ENDIF 

2674 3. ‘ i ENDIF 

2675 t. ; UPDATE GOOD ADDRESS (ADD 02) ) 

2676 “" UPDATE CURRENT ADDRESS é' 

2677 3. n ENODO 

2678 :. UPDATE LOW ADDRESS (ADD #2000) 

2679 Bs ENDDO 

2680 ;ENDDO 

2681 ;01S ABLE MMU 

2682 sRESTORE VECTOR 114 

2683 sENDTST 

2684 

2685 3R3*GOODAD 

2686 3RS=CURADD 

2687 8 8288S SO664006600646066606646666 066066660040 68406 660064040668 000660060042000868 

2688 007274 TST21: 

2689 007274 005267 171504 INC sTESTN ;INCREMENT TEST NUMBER 

2690 007300 032777 000400 171540 BIT OBI TO8, aSWR sIS THIS AN 18 BIT SYSTEM? 

2691 007306 001402 BEQ 300% 300 THIS TEST IF IT ISN'T 

2692 007310 000167 000404 JMP 108 ;ELSE: JUMP TO END OF TEST 

2695 007314 012767 140000 171564 3003: MOV 140000 , LOWADD S INITIALIZE LOW ADDRESS (USE PARE6) 

2694 007322 004767 172064 JSR PC, INI TMM sINITIALIZE MMU 

2695 007326 012767 000020 163162 MOV @20,SR5 sENABLE 22 BIT ADDRESSING 

2696 007334 052737 000001 177572 BIS BI TOO,8eSRO sENABLE MMU 

2697 007342 012767 177760 171510 MOV 6-16., LOOPIN s00 UNTIL ALL BLOCKS TESTED 

2698 007350 012737 002000 172354 13: MOV #2000 , 80K IPARG 1SET_KIPAR6 RELOCATION CONSTANT TO PAGE 8 

2699 007356 012737 000402 177746 MOV e402, a@CCR ;FLUSH CACHE AND SET DIAG BIT 


2700 007364 016705 171516 MOV LOWADD, RS sGET FIRST ADDRESS IN CURRE®.T BL OCK 


A AREAS 


GLOBAL 
KDJ1L1A.MAC 


012767 
0050 


016703 
012705 
012737 
013767 
012737 


012767 
012767 
005015 
013702 


177400 
000002 
000200 
171440 


171462 
140000 
002000 
000114 
001630 


177400 
177761 


177752 
007470 


177701 
0000 76 


007300 
172042 


171460 


172354 


171376 
171366 


001120 


001120 


4s: 


OS-APRB4 Iitke os ‘Rc RAs Do 


ES 


ADDRESS TEST 
6-256. 7 
5) 


ALLCTR 


SEQ 9056 


300 UNTIL ALL ADDRESSES ALLOCATED 
sWRITE CURRENT ADDRESS 

sUPDATE CURRENT ADDRESS 

sADD 200 TO KIPAR6 TO INC TAG CONTENTS 
+4 a ADDRESSES ALLOCATED 

r 


s ;sADDRESSES HAVE NOW BEEN — NEXT WE’‘LL CHECK THAT 
3;THERE WAS NO DUAL ADDRESSING 


5$: 
6$: 
205%: 


sADDRESS (THE EFFECTIVE 
3;OF THE CURRENT INSTRUCTION FETCH ADDRESS. 


AMPAR , 80114 
@-256., ALLCTR 


6-15. 7 
) 


OCOUNT 


CRS 
BOHITMIS .R2 


THE FOLLOWING CODE IS TO CHECK FOR EXTRA FETCHES CAUSED BY THE PRE-FETCH 
sBUFFER BEING OVER WRITTEN WHEN BITS 1-5 OF THE PREVIOUS WRITE 
ADDRESS OF CLR (RS)) ARE EQUAL TO BITS 1-5 


s INITIALIZE GOOD a at 

sGET FIRST ADORE 

sRESET KIPAR6 

sSAVE VECTOR 

sLET VECTOR POINT TO RAM ABORT ROUTINE 


300 UNTIL ALL LOCATIONS CHECKED 

eats it ADDRESS IN EACH BLOCK CHECKED 
5 

sSAVE THE CONTENTS OF THE HIT/MISS REG 


OF MOV SOHITMIS,R2 INST) 


CADORESS 
;THE EXTRA FETCH CAUSES THE HIT MISS REGISTER CONTENTS TO BE SHIFTED. 
@205$ ,R4 
R4 


220$: 


2303: 


7$: 


RS ,R4 


#177701 ,R4 
@76,R4 


220% 
@BITO2?] ,R2 
7$ 


230% 
@BITOS,R2 
7$ 


RS, 


PC ,AP 


72 
ERRMSG 


R5, 
8 


R3 


8$ 
bet $ Rene at aliaias 


R3 


° 
@TST21 +4, @eSOF TRE 
PC ,APTSFT 


: SAVE eat ie OF MOVE INST IN R4 


;TO ANY OF BITS 1-5 IN R4 THEN THE 
T EQUAL 


NOT E 
CONCERNED WITH BITS 5-1 
sIF R4=76 THEN BITS S-1 IN R4& AND RS 
sWERE COMPLIMENTS 
3IF THEY'RE NOT 
3THEN CHECK FOR BIT2 SET IN HIT/MISS REG. 
sIF ACCESS WAS A CACHE MISS THEN GO TO 7$ 
sELSE IT WAS A HIT; GO TO 2308 
sELSE CHECK FOR BITS SET IN oe REG. 
24 ITS NOT A HIT THEN GO TO 7 


SE 
VIF CURRENT ADDRESS NOT EQUAL TO GOOD 
sADDRESS THEN 
sMOVE RETRY ADDRESS TO SOFT RETURN 
3GO TO SOFT ERROR SUBROUTINE 

sCACHE SYSTEM ERROR 

sGOT A CACHE MISS WHEN EXPECTING A WIT. 
3 ALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 
tTF_ CURRENT ADDRESS EQUAL GOOD ADDRESS 


sMOVE RETRY ADDRESS TO SOFT RETURN 
sGO TO SOFT ERROR SUBROUTINE 
sCACHE SYSTEM ERROR 


GLOBAL AREAS 
KDJ11A.MAC 


03-APR 


001000 
171240 


000002 
017000 
000002 
000200 
171212 


001000 
171200 


177462 
167700 
171132 
177744 
177766 
001116 
000000 


172354 


171232 


000114 


er HD 4 POM 1052) 04 - oe 


10$: 


rot 


10: pace 57 
RAM DUAL ADDRESS TEST 
ERROR 
.WORD 73 
.WORD ERRMSG 
ADD #1000, R5 
INC DCOUNT 
BLT 6% 
ADD G2, R3 
BIC #17000, RS 
ADD 2, RS 
ADD #200, 8K IPARG 
INC ALLCT 
BLT S$ 
ADD #1000, LOWADD 
INC LOOPIN 
BGE 9$ 
JMP 1% 
CLR 
MOV SLOCOO, 90114 
CLR SOMSER 
CLR SOCPEREG 
CLR QOSOF TER 
JMP TST22 


SEQ 9057 


A CACHE HIT WHEN EXPECTING A MISS. 


3 ALL ERRORS TO TRAP TO EMT VECTOR 
sUNIQUE ERROR NUMBER 

sADDRESS OF ERROR MESSAGE 

sUPDATE TO NEXT BLOCK 

4 ss NOT CHECKED FOR EACH BLOCK 


; 
sUPDATE GOOD ADDRESS 
sUPDATE ADDRESS TO BE CHECKED 


sIF ALL ADDRESSES CHECKED 

sENDDO 

sUPDATE TO NEXT BLOCK TO BE ALLOCATED 
;IF ALL BLOCKS WERE TESTED 

sENDDO 


5 

sDISABLE MMU 

sRESTORE ABORT VECTOR 

sCLEAR THE MEM SYS ERROR REG 

;CLEAR THE CPU ERROR REGISTER 

sCLEAR THE SOFT ERROR COUNT 

3 JUMP OVER DATA TABLES OR SUBROUTINES 
;TO NEXT TEST 


007720 


010110 
010112 
010120 
010124 


010130 


010134 


012737 
012701 
012706 


012702 


012137 


171060 
001000 


000772 
000400 


177777 


172352 


KDJIIA.MAC O3-APRB4 tisk — Bt - ‘Tic RAN RAM DUAL ADDRESS TEST 


171114 


171100 
171064 


171036 
000114 


162274 
162472 
162516 


167516 


172300 


177746 


G5 


SEQ 0056 


-DSABL AMA 
CTST24: 


Ss FP#SSSSAAAESESESSSSESEASESESEEESEHRARASEEASAASEASAREAARERERESEREREES 


;#TEST 22 TAG RAM DATA RELIABILITY TEST 
£ fs PSSSSESASSAGASSEEASESAAAEEAEEAREAEASEEREAELESLEEASREASARAZEEREAAES 
TST2e: 
INC $TESTN ; INCREMENT TEST NUMBER 
BIT oBITO9,aSWR sARE DATA RELIABILITY TESTS SELECTED? 
BNE 1000$ sIF BITOS IN SWR = 1 ; THEN DO TEST 
JMP XXX ;ELSE GO TO END. 
1000$: BIT S&B ITOS ,SSWR :IS THIS AN 18 BIT SYSTEM? 
BEQ 1001$ ;IF BITOS IN SWR=0 BRANCH TO 10013 
soy wt A _ UP INDICATOR FOR 18 BIT SYS 
1001$: CLR FLAG ;SET UP INDICATOR FOR 22 BIT SYSTEM 
1002$: MOV 80114 ,SLO0COO ;SAVE OLD PARITY ERROR VECTOR 
oy oo ;PUT TRAP CATCHER IN FOR CACHE PARITY ERRORS 
& 
JSR PC, INI TMM sINITIALIZE MMU 
BIC #BIT1S,KIPORS ;CLEAR CACHE BYPASS ON PDRS 
MOV @20, SR3 sENABLE 22 BIT ADDRESSING. 
MOV #1600, KIPAR4 ;SET KIPAR4 TO RELOCATE TO BANK 7 OF MEM. 
MOV #100000,R1 ;SET UP R1 AS POINTER TO BANK 7 VIA KIPARG 
MOV 00 ,R2 ;SET UP R2 AS POINTER TC SANK O 
MOV 04096. ,RO ;SET UP RO AS COUNTER 
MOV 1,SRO ; TURN ON MMU 
100$: ps sag gal sMOVE ALL THE CODE IN FIRST 4KW TO BANK 7 
6 ‘ 
JMP 8@101$+100000 sSTART EXECUTING OUT OF BANK 7 
3sWE ARE NOW OPERATING FROM PHYSICAL MEMORY IN BANK 7 (160000-177776) 
3 
101$ #140000 ,R1 ;SETUP TO INIT CACHE TAG STORE TO ZEROS 
CLR aeK IP ARG ;SET KIPAR6 TO RELOCATE TO PAGE O 
BIC #BIT15, 80K IPORO sALLOW CACHE REFERENCE ON PAGE ZERO 
MOV #10000, Re sINITIALIZE 4K WORDS 
1$; TST CR1)-+ :;CLEAR TAG STORE 
SOB Ro, 1$ sLOOP UNTIL ALL OF TAG STORE INITIALIZED 
é 
MOV #BIT01,aeCCR ;SET OIAGNOSTIC BIT IN CCR 
MOV @TAGAD1 +100000,R1 sMAKE R1 A POINTER TO TABLE OF DATA. 
MOV #120000 , R6 ;SET UP TEST ADORESS IN R6 
sUSING R6 TO SPEED UP TEST LOOP 
#140002 ,Re2 sR2 WILL BE USED TO INDEX THRU THE CACHE. 


MOV 
sSTART TESTING 
;THE OBJECT OF THIS TEST IS TO TRY EVERY POSIBLE DATA COMBINATION AT a 
sGIVEN ADDRESS WHILE ALL OTHER ADDRESSES ARE SET TO ALL ZEROS. ONCE A 
sCHANGE IN THE DATA AT A PARTICULAR ADDRESS HAS BEEN MADE; ALL OTHER 
sADDRESSES ARE CHECKED TO ENSURE THAT DATA HAS NOT BEEN ALTERED. WHEN ALL 
;DATA COMBINATIONS HAVE BEEN CHECKED AT A PARTICULAR ADDRESS; THAT ADDRESS 
sIS RESET TO ZEROS AND THE NEXT CONSECUTIVE ADRESS IS TESTED. THIS IS DONE 
sUNTIL ALL 4096 LOCATIONS HAVE BEEN TESTED. 


FLDO: MOV (R1)+, BOK IPARS sMOVE RELOCATION OFFSET (DATA THAT WILL 


H5 


Au. AREAS 


GLOB MACYI1 SOACL0S2) 04-APR-84 10:38 PAGE 59 

KDJLIA.MAC” O3-APR-B4 11:46 122 TAG RAM DATA RELIABILITY TEST SEQ 9059 
2839 ;BE IN THE TAG RAMS) TO KIPARS. 
2840 010140 005767 170676 TST FLAG :IS THIS 7AN,16 BIT SYSTEM 
2841 010144 001403 BEQ 1$ ;BRANCH IF NOT 
2842 010146 042737 170000 172352 BIC #170000, B¢KIPARS sMODIFY FOR 18 BIT SYSTEM 
2843 010154 005016 : CLR (R6) sLOAD TAG RAMS WITH DATA PATTERN. 
2844 010156 013703 177752 MOV QOHITMIS ,R3 »SAVE CONTENTS OF HIT/MISS REG IN R3 
2845 010162 005703 TST R3 sHIT MISS REGISTER SHOULD BE CLEAR 
2846 010164 001403 BEQ FLDOA ;BRANCH TO FLDOA 
2847 010166 104000 ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
2848 010170 000074 .WORD 74 sUNIQUE ERROR NUMBER 
2849 010172 001325 .WORD ERRMSG SADDRESS OF ERROR MESSAGE 
2850 ;CACHE SYSTEM ERROR 
2851 ERROR! ! WE GOT A CACHE HIT- WANTED A MISS 
2852 010174 FLDOA: 
2853 010174 0057 TST (R6) ;CHECK THAT CACHE WAS PROPERLY ALLOCATED. 
2854 010176 032737 000010 177752 BIT ©BITO3,90HITMIS WE RE LOOKING FOR A HIT THIS TIME 
2855 010204 001003 BNE 100$ 
2856 010206 104000 ERROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
2857 010210 000075 .WORD 75 ;UNIQUE ERROR ER 
2858 010212 001325 .WORD ERRMSG ;ADDRESS OF ERROR MESSAGE 
2859 ;CACHE SYSTEM ERROR 
2860 ;ERROR! 
2861 010214 012700 010000 100$: MOV 04096. .RO sINIT RO TO COUNT 4KWORDS. 
2862 010220 012704 000004 MOV @BITO2,R4 ;LOAD DATA INTO R4 TO SPEED UP BIT INST. 
2863 010224 012705 160000 MOV 1 ; sLOAD DATA INTO RS TO SPEED UP CMP INST. 
2864 010230 020502 1$: CMP RS, sIF TOP OF CACHE HAS BEEN REACHED 
2865 010232 001410 BEQ 102$ ;GO RESET R2 TO 140000 
2866 010234 005722 2$: TST (R2)- ;ENSURE THAT OTHER CACHE LOCATIONS 
2867 ;WERE UNAFFECTED. 
2868 010236 030437 177752 BIT R4, QOHITMIS ;ALL CACHE LOCATIONS SHOULD HIT. 
2869 010242 001407 BEQ 3$ ;KEEP GOING UNTIL WE GET A MISS 
2870 010244 077007 1018: RO,18 :TEST THE NEXT CACHE LOCATION 
2871 010246 104000 RROR ;ALL ERRORS TO TRAP TO EMT VECTOR 
2872 010250 000076 .WORD 76 ; UNIQUE ERROR NUMBER 
2873 010252 001325 .WORD ERRMSG ;ADDRESS OF ERROR MESSAGE 
2874 ;CACHE SYSTEM ERROR 
2875 sERROR! WE SHOULD HAVE GOTTEN A MISS 
2876 ;BEFORE FALLING THRU SOB 
2877 010254 042702 037776 102s: BIC 037776,R2 sRESET R2 TO 140000 
2878 010260 000765 BR 23 : 
2879 010262 010203 3$: MOV R2.R3 ;SAVE CONTENTS OF R2 IN R3 
2880 010264 162703 020002 SUB #20002 ,R3 sSUBTRACT 20002 FROM CONTENTS OF R3 
2881 010270 020 CMP R3,R6 ;SHOULD BE EQUAL. IF NOT; THEN THE 
2882 ;CACHE RAM HAS BEEN ALTERED 
2883 010272 001403 BEQ 4$ :GO TO NEXT TES 
2884 010274 104 ERROR :ALL ERRORS TO TRAP TO EMT VECTOR 
2885 010276 000077 .WORD 77 sUNIQUE ERROR NUMBER 
2886 010300 001325 .WORD ERRMSG ;ADDRESS OF ERROR MESSAGE 
2887 ;CACHE SYSTEM ERROR 
2888 ©10302 005711 4$: TST (R1) HAVE WE TRIED ALL PATTERNS AT THIS LOC? 
2889 010304 001313 BNE FLDO :GO GET NEXT ADDRESS IF YES. 
2890 :IF NOT GO DO THE NEXT DATA PATTERN, 
2891 010306 022706 137776 S$: CMP 0137776 ,R6 sHAVE WE TESTED ALL 4KW CACHE LOCATIONS: 
2892 010312 001410 BEQ FLDL :IF YES THEN GO TO NEXT TEST 
2893 010314 062706 000002 ADD 02,R6 sELSE GET THE NEXT ADDRESS... 
2894 010320 062702 000002 ADD #2 ,R2 ;BUMP R2 


GLOBAL AREAS 
KDJ11A.MAC 


010530 


012701 
000167 


012701 
012737 


MACY11 30A( 1052) 
03-APR-84 11:36 


110672 
177600 


140000 
077600 


170470 
170000 
00000 


000010 


177752 


037776 


010512 
170332 


04 - APR - 84 
T22 


172354 


172354 
177746 


172352 


177752 


3 
FLDI: 


100$: 
1$; 


FLDIA: 


1$: 


10:38 


FLDIB: 


1$: 


100%: 
23: 

101$: 
1028: 


1038; 


104$: 
105$: 


i 


PAGE 60 
TAG RAM DATA RELIABILITY TEST 
@TAGAD1+100000 ,R1 
FLDO 


#140000 ,R1 
977600 , BOK IPAR6 


FLAG 
100$ 


#170000 , BOK IPARG 
6BIT01,a0eCCR 
94096. ,R2 


@TAGAD2 + 100000, R1 
#120000 .R6 
#140002 ,R2 

(R1)+, BOKIPARS 
FLAG 


18 
— 


CR6 
BOHITMIS,RS 
R3 

FLD1iB 


100 
ERRMSG 


CR6) 
@BI TOS, ,AeHITMIS 
100$ 


GBOHITMIS,RS 
#BITO2,.R3 
05$ 


i 
RO,2$ 


102 
ERRMSG 


@37776,R2 
101% 


#102$ ,R4 
R2,CURADD 


SEQ 9060 


sRESET DATA POINTER 
300 IT AGAIN 


; INIT R1 

sDATA IN KIPAR6 WILL CAUSE TAG RAMS 

3TO BE SET TO ALL 1’S. 

;IS THIS AN 18 BIT SYSTEM? 

sBRANCH IF NOT 

sMODIFY FOR 18 BIT SYSTEM 

sSET DIAGNOSTIC BIT IN CACHE CONTROL REG 
;SET UP TO FILL 4KW OF CACHE WITH ONES 
_— THE CACHE 


ISET UP R1 AS A POINTER TO DATA TABLE 
+H UP ee ESS 
: 
sDATA IN KIPARS WILL BE WRITTEN INTO TAG RAM 
31S THIS AN 18 BIT SYSTEM? 
sBRANCHIF NOT 
sMODIFY FOR 18 BIT SYSTEM 
;WRITE TAG RAM WITH TEST DATA 
;STORE CONTENTS OF HIS MISS REGISTER 
:HIT/MISS REGISTER SHOULD BE CLEAR 
;BRANCH IF IT WAS A MISS 
;ALL ERRORS TO TRAP TO EMT VECTOR 
;UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 


;TEST ADDRESS SHOULD NOW BE ALLOCATED IN CACHE 
;0ID IT HIT? 
sBRANCH IF YES 
;ALL ERRORS TO TRAP TO EMT VECTOR 
s;UNIQUE ERROR NUMBER 
:ADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 
sINIT RO TO COUNT 4 KWORDS 
:;STORE DATA IN RS FOR FASTER CMP INST. 
;IF THE TOP OF CACHE HAS BEEN REACHED 
; THEN GO RESET R2 TO 140000 
;CHECK THE OTHER CACHE LOCATIONS TO 
;SEE THAT THEY STILL HIT 
;SAVE MIT MISS REG IN RZ. 
;DID IT WIT? 
:KEEP TESTING UNTIL A MISS OCCURS 
sTEST THE NEXT CACHE LOCATION 
;ALL ERRORS TO TRAP TO EMT VECTOR 
:;UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 
sERROR! D NOT HAVE FALLEN THRU 
3SOB INST BEFORE GETTING A MISS 
sRESET R2 TO 140000 


& 
sSAVE ADDR OF MOV INSTRUCTION IN R4 
;SAVE R2 IN CURADD 


GLOBAL. 


KDJ11A. 


010712 
010714 


010716 
010722 


010740 


J5 


SEQ 9061 


sSUBTRACT 2 FROM R2 

sONLY INTERESTED IN BITS 1-5 

sSTRIP OFF UN-NEEDED BITS 

+4 BITS S5S-1IN R4&4 AND CURADD ARE EQUAL ? 


HEN 
;TEST BITOS IN HIT MISS REG 
sIF ITS A HIT THEN DO THE NEXT ADDR 


i 
sSTORE CONTENTS OF R2 IN R3 
sSUBTRACT 20002 FROM R3 


EQUAL 
;ALL ERRORS TO TRAP TO EMT VECTOR 
;UNIQUE ERROR NUMBER 
sADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 
;WAS THIS THE LAST PATTERN FOR THIS LOCATION? 
;GO GET NEXT ADDRESS IF YES 


1 CHECK TO SEE IF ALL LOCATIONS HAVE BEEN TESTED. IF NOT, GENERATE THE NEW 
SS, RESET THE DATA POINTER AND TEST THE NEXT CACHE LOCATION. 


MACY11 30A(1052) 04-APR-84 10:38 PAGE 61 
03-APR-84 11:36 122 TAG RAM DATA RELIABILITY TEST 
162767 000002 170324 #2, CURADD 
042767 177701 170316 BIC #177701, CURADD 
042704 177701 BIC 0177701.R4 
020467 170306 R4,CURADD 
001004 BNE 33 
032703 000010 BIT ®BITOS,R3 
001401 BEQ 3$ 
746 103$ 
010203 3$: MOV R2,R3 
162703 020002 SUB #20002 ,R3 
020 CMP R3,R6 
001403 BEQ 4$ 
104 ERROR 
000103 WORD 103 
001325 WORD ERRMSG 
005711 4$: TST (RL) 
001409 BEQ 6$ 
022706 137776 6$: CMP 0137776, R6 
001412 BEQ a4 
177776 7$: CLR -2(R2) 
062706 000002 ADD 02,R6 
062702 000002 ADD @2,R2 
012701 110704 MOV @TAGAD2+100000,R1i 
000167 177526 JMP FLDIA 
000137 010716 8$: JMP @eTSEND 
a 
‘ 
104200 TAGADi: .WORD 104200 
010400 .WORD 010400 
121000 .WORD 121000 
042000 . WORD 2000 
. WORD 
073400 TAGAD2: .WORD 073400 
167200 .WORD 167200 
056600 .WORD 056600 
135600 .WORD 135600 
.WORD 000000 
3 
005037 177746 TSEND: CLR @eccR 
005037 177572 CLR @oSRO 
012706 001000 MOV @STBOT RE 
016737 170072 000114 Xxx: MOV SLOCOO, 90114 
016737 170066 000116 MOV SLOCO1, 80116 


;sHAVE WE TESTED ALL 4KW CACHE LOCATIONS? 
;IF YES THEN GO TO END OF TEST 

;ELSE WRITE ONES IN _ "LOCATION LAST TESTED 
;GET — NEXT ADDRESS. 

;BUMP R 

;RESET SATA POINTER 

:D0 IT AGAIN 

; JUMP OUT OF BANK 7 


;CLEAR THE CCR 

;TURN OFF MMU 

sRESTORE STACK POINTER 
sRESTORE VECTOR 


GLOBAL AREAS 
KDJ11A.MAC 


010746 


03 abn he mom ayes > 04 - APR - 


011162 


1706034 
011054 


170022 
100000 


0111355 
167770 


011050 
000042 


170014 


64 
T22 


10:38 PAGE Gs 
TAG RAM DATA RELIABILITY TEST 


K5 


-MCALL IDMSG,.ENDPAS 
.SBTTL END OF PASS ROUTINE 


§ § PPE SESESASSSEDASESEADASACEEEEEEEEHEEEREADEDEEEDEDOEREREEDEEEDES 
s*INCREMENT THE PASS NUMBER ($PASS) 

;*INDICATE END-OF -PROGRAM AFTER 1 PASSES THRU THE PROGRAM 

;*IF THERES A 5 eh GO TO IT 


3#IF THERE ISN‘T 


JUMP TO RESTART 


sEOP: 
TST $PASS ;ONLY TYPE MESSAGE AT END OF FIRST PASS 
BNE SKIPID ;IF >O THEN SKIP THE ID MESSAGE 
TYPE »MSG1 ;ELSE TYPE THE ID MESSAGE 
SKIPID: 
INC $PASS 3; INCREMENT THE PASS NUMBER 
BIC #100000, $PASS :;D0N'T ALLOW A NEG. NUMBER 
DEC (PC)- 3; ;LO0OP? 
SEOPCT: . 
BGT $DOAGN 33YES 
MOV CPC)+,aCPC)> : ;RESTORE COUNTER 
SENDCT: .WORD 1 
SEOPCT 
TYPE »MSG2 
MOV $PASS, -(SP) ;;SAVE $PASS FOR TYPEOUT 
TYPOS ::;GO TYPE--DECIMAL ASCII WITH SIGN 
TYPE » SENULL 
$GET42: MOV 8042 ,RO ;:;GET MONITOR ADDRESS 
BEQ ; ;BRANCH IF NO MONITOR 
RESET :;CLEAR THE WORLD 
SENDAD: JSR PC ,CRO) ::GO TO MONITOR 
NOP :3;SAVE ROOM 
NOP 33FOR 
NOP 3sACT11 
$DOAGN: 
JMP @CPC )-+ 3; sSRETURN 
$RTNAD: . RESTART 
SENULL : pee -1,-1,0 ssNULL CHARACTER STRING 
MSGL: ~ASCIZ <CR><LF>/CZKDM-B-O KDJ11 CACHE MEMORY SYSTEM DIAGNOSTIC/ 
MSGe: ~-ASCIZ <CR><LF>/CZKDOMB END PASS #@/ 
-EVEN 
.SBTTL TYPE ROUTINE 


££ FPSSESEESEASESSESSESESESAAAOAAEEAEHAEHEEEAEOEDEEEEHEEEHEEEKERELEDEDS 


;*ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 


SEQ 9062 


AREAS 


GLOBAL 
KDJ11A.MAC 


011162 


03 ABR he oom 4952) 04 - npn 08 


105767 
100002 
000000 


000343 


000002 
000001 


000100 


000004 
001622 


167610 
167601 


167557 


ia 


38 PAGE 63 


PE ROUTINE 


3#THE ROUTINE 2. INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 


;*NOTE1: 
3; *#NOTE2: 
;*NOTES: 


3% 
;*CALL: 


1$: 


on 
re 
Us 2 


6 
2 


60%: 
3$: 


4$: 


S$: 
6$: 


7$; 


NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 


SPILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
SFILtC CONTAINS THE CHARACTER TO FILL AFTER. 


3#1) USING A TRAP INSTRUCTION 
TYPE MESADR 


$TPFLG 
1$ 


RO 
GAPTENV, SENV 
62$ 
@APTSPOOL , SENVM 
62$ 
RO,61$ 
east thy 
@APTCSUP , SENVM 
60$ 
CRO)+, -CSP) 
4$ 
CSP )>+ 
(SP)+,RO 
@2,(SP) 

@HT CSP) 
8$ 
@CRLF ,(C SP) 
5$ 

CSP )>+ 


8 gaat 


Sc. sTvPEC 
$FILLC.CSP)-+ 


2s 
$NULL, -( SP) 
1(SP) 

$ 


6 
PC, $TYPEC 
| adage a 


sHORIZONTAL TAB PROCESSOR 


ssMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


3:;1S THERE A TERMINAL? 
:;;BR IF YES 
;;HALT HERE IF NO TERMINAL 
3; sLEAVE 

;3SAVE RO 

;3;GET ADDRESS OF ASCIZ STRING 
: sRUNNING IN APT MODE 

:3;NO,GO CHECK FOR oe rent 
; SPOOL MESSAGE TO A 

:;:NO.GO CHECK FOR CONSOLE 
;sSETUP MESSAGE ge oy FOR APT 
;;SPOOL MESSAGE TO AP 


: sMESSAGE ADDRESS 
;FAPT oe yg SUPPRESSED 
3s3YES,SKIP TYPE OUT 


:sPUSH CHARACTER TO BE TYPED ONTO STACK 
338R IF IT ISN'T THE TERMINATOR 

33IF TERMINATOR POP IT OFF THE STACK 
;sRESTORE RO 

ger oe MU RETURN PC 


33 URN 
:;BRANCH IF <HT> 
;:BRANCH IF NOT <CRLF> 


:3:POP <CR><LF> EQUIV 
s:TYPE A CR AND LF 


;:CLEAR CHARACTER COUNT 

;;GET NEXT CHARACTER 

3:GO TYPE THIS CHARACTER 

331S IT TIME FOR FILLER CHARS. ? 
:3IF NO GO GET NEXT CHAR. 

3;GET @ OF FILLER CHARS. NEEDED 
;3;AND THE NULL CHAR. 

:;00ES A NULL NEED TO BE TYPED? 
::8R IF NO--GO POP THE NULL OFF OF STACK 
:3:GO TYPE A NULL 

3300 NOT COUNT AS A COUNT 

; ;sL OOP 


SEQ 9063 


GLOBAL AR 
KDJ11A.MAC 


EAS 


011514 
011516 
011520 


011533 


MACY11 30A( 1052) 
03-APR-84 11:36 


112716 
004767 


005726 


04-APR-84 10: 


000124 


000042 
000002 


M5 


:38 PAGE 64 
TYPE ROUTINE 
8$: MOVB &* CSP) 
9$: JSR PC, $TYPEC 
BITs #7, $CHARCNT 
BNE as 
TST (SP )+ 
BR 2s 
sTYPEC: 
TSTB asTKS 
BPL 10$ 
MOV Os TKB, -C SP) 
BIC #177600,(SP) 
CMPB o$XxOFF ,C SP) 
BNE 102$ 
101$ 
TSTB asTKS 
BPL 101$ 
MOVB 8s TKB,CSP) 
BIC #177600, (CSP) 
Cc @$XON, (SP) 
B 101% 
102$ 
TST (SP )-« 
10%: 
TSTB @sTPS 
BPL 10$ 
MOVB 2(SP),asTPB 
@CR,2(SP) 
BNE is 
CLRB SCHARCNT 
BR $TYPEX 
1$: CMPB LF ,.2(SP) 
BEQ $TYPEX 
I CPC)-+ 
SCHARCNT: . 0 
$TYPEX: RTS PC 
$TKS: . WORD 177560 
$TKB: . WORD 177562 
$TPS: . WORD 177564 
$TPB: -WORD 177566 
SNULL: .BYTE O 
SFILLS: .BYTE 2 
SFILLC: .BYTE 12 
S$TPFLG: .BYTE 0] 
$QUES: .ASCII “?” 
$LF: ‘oar <12> 


SEQ 0064 


;;REPLACE TAB WITH SPACE 
:;;TYPE A SPACE 

; ;BRANCH IF NOT AT 

;;TAB STOP 

;3;POP SPACE OFF STACK 
;;GET NEXT CHARACTER 


3;CHAR IN KYBD BUFFER? ;MJD001 
;;B8R IF NOT ;MJD001 
;:;GET CHAR :>MJD001 
;:STRIP EXTRANEOUS BITS ;MJDOO1 
3;:WAS CHAR XOFF ;MJDOO1 
;;B8R IF NOT :4J0001 

:MJDOO1 
:;;WAIT FOR CHAR ;MJDOO1 

:;MJD001 
;3GET CHAR ;MJDOO1 
33;STRIP IT ;MJDOO1 
3;3;WAS IT XON? ;4JD001 
:;;B8R IF NOT ;MJD001 

sMJDO001 
33FIX STACK ;MJDOO01 

;MJDOO1 


:sWAIT UNTIL PRINTER IS READY 


;;LOAD CHAR TO BE TYPED INTO ponte REG. 
331IS sect Yc A CARRIAGE RETURN? 

38 

"aang CHARACTER COUNT 
33 

3331S CHARACTER A LINE FEED? 
;;BRANCH IF YES 

;;COUNT THE CHARACTER 

3 ;CHARACTER COUNT STORAGE 


ssTTY KDB STATUS ;MJDOO1 

s:TTY KBD BUFFER :MJDOO1 

::TTY PRINTER STATUS REG. ADDRESS 

3:TTY PRINTER BUFFER REG. ADDRESS 

; ;CONTAINS NULL CHARACTER FOR FILLS 

3; s;CONTAINS @ OF ag CHARACTERS REQUIRED 
;;INSERT FILL CHARS. AFTER A "LINE FEED” 

33: “TERMINAL AVAILABLE” FLAG (BIT<07>=0=YES) 
3; sQUESTION MARK 

; sLINEFEED 


EVE 
-SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


§ S PORSEEOSSSESASEEOAEHEEDREEASERSEALEDEDADEDREDEADRERREEEDEDRREDRELEE 
;#THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5S-DIGIT 
3*SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 


34 


NUMBER IS POSITIVE OR NEGATIVE A SPACE OR 


A MINUS SIGN WILL BE TYPED 


;*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
;#REPLACED WITH SPACES. 


3;*CALL: 


N5 


A AREAS 


GLOB MACY11 30A(1052) 04-APR-84 10:38 PAGE 6 SEQ 0065 
KDJ11A.MAC 035-APR-84 11:36 conven? BINARY To” BECIMAL AND TYPE ROUTINE 

3170 34 MOV NUM, -(SP ) ;;PUT THE BINARY NUMBER ON THE STACK 

4483 :* TYPDS ;:;GO TO THE ROUTINE 

3173 011536 s$TYPDS: 

3174 011536 010046 MOV RO, -(SP) :;PUSH RO ON STACK 

3175 011540 010146 MOV R1,-CSP) ;:PUSH R1 ON STACK 

3176 011542 010246 MOV R2,-CSP) 3:PUSH R2 ON STACK 

3177 011544 010346 MOV R3,-(CSP) ;3PUSH R3 ON STACK 

317868 011546 010546 MOV RS, -CSP) ::PUSH RS ON STACK 

3179 011550 012746 020200 MOV #20200, -( SP) ;;SET BLANK SWITCH AND SIGN 

3180 011554 016605 000020 MOV 20(SP),RS ;:;GET THE INPUT NUMBER 

3181 1560 100004 BPL 1$ ;;BR IF INPUT IS POS. 

3182 011562 005405 NEG 5 ;;MAKE THE BINARY NUMBER POS. 

3183 1564 112766 000055 000001 MOVB @' -,10SP) ;;MAKE THE ASCII NUMBER NEG. 

3184 011572 1$: CLR RO 3;ZERO THE CONSTANTS INDEX 

3185 011574 012703 011752 MOV #$DBLK ,R3 ;;SETUP THE OUTPUT POINTER 

3186 011600 112723 000040 MOVB #' ,CR3)> 33SET THE FIRST CHARACTER TO A BLANK 

3187 011604 005002 2$: CLR Ro ;;CLEAR THE BCD NUMBER 

5188 011606 016001 011742 MOV S$DTBLCRO),R1 ;:GET THE CONSTANT 

3189 011612 160105 3$: SUB R1,RS :3;FORM THIS BCD DIGIT 

3190 011614 002402 BLT 4$ + 7BR IF DONE 

3191 011616 005202 INC Re ;s INCREASE THE BCD DIGIT BY 1 

3192 011620 000774 BR 3$ 

3193 011622 060105 4$: ADD R1,R5 ;;ADD BACK THE CONSTANT 

3194 011624 005702 TST Re ;:;CHECK IF BCD DIGIT=0 

3195 011626 001002 BNE S$ 33;FALL THROUGH IF O 

3196 011630 105716 TSTB (SP) ::STILL DOING LEADING 0'S? 

3197 011632 100407 BMI 7$ 3;B8R IF YES 

319&€ 011634 106316 5$: ASLB (SP) 33MSD? 

3199 011636 103003 BCC 6$ 3;68R IF NO 

3200 011640 116663 000001 177777 MOVB 1CSP),-1(R3) :3YES--SET THE SIGN 

3201 011646 052702 000060 6$: BIS #'0O,R2 ;sMAKE THE BCD DIGIT ASCII 

3202 011652 27 000040 7$: BIS @' ,R2 ;sMAKE IT A SPACE IF NOT ALREADY A DIGIT 

3203 011656 110223 MOVB R2,CR3)-+ 3;PUT THIS CHARACTER IN THE OUTPUT BUFFER 

3204 011660 005720 TST CRO)>+ :3JUST INCREMENTING 

3205 011662 020027 000010 CMP RO,#10 3:CHECK THE TABLE INDEX 

3206 011666 002746 BLT 2s :3GO DO THE NEXT DIGIT 

3207 011670 3002 BGT 8$ 3:GO TO EXIT 

3208 011672 010502 MOV R5,R2 3;GET THE LSD 

3209 011674 764 BR 6$ :3GO CHANGE TO ASCII 

3210 011676 105726 8$: TSTs CSP )-+ :;:;WAS THE LSD THE FIRST NON-ZERO? 

3211 011700 100003 BPL bY 33 IF 

S212 011702 116663 177777 177776 MOVB -1(SP), -2C€R3) 3;YES--SET THE SIGN FOR TYPING 

3213 011710 105013 9$: CLRB ) 3;SET THE TERMINATOR 

$214 011712 012605 MOV (SP)+,R5 ::POP STACK INTO RS 

3215 011714 012603 MOV (SP )+,R3 3;POP STACK INTO R3 

3216 011716 012602 MOV (SP)+,Re ;;POP STACK INTO Re 

3217 011720 012601 MOV (SP)+,R1 ;3POP STACK INTO R1 

3218 011722 012600 MOV (SP)+,RO ;3:POP STACK INTO RO 

3219 011724 104401 011752 TYPE » $SDBLK ;;NOW TYPE THE NUMBER 

32 011730 Ol 000002 000004 MOV 2(SP),.4¢CSP) ;;ADJUST THE STACK 

$221 011736 012616 MOV (SP )+,(SP) 

S222 011740 RTI ; sRETURN TO USER 

3223 011742 023420 $DTBL: 10000. 

3224 011744 001750 1000. 

3225 011746 000144 100, 


GLOB 


AREAS 


AL 
KDJ11A.MAC 


011752 


011762 


Ol2il2 
012116 


MACY11 30A( 1052) 
-864 11:36 


03-APR 
011750 000012 


000004 


0000 76 
177770 


04-APR-84 10: 


000211 


000171 
000165 
000154 


b6 


:38 PAGE 66 
CONVERT BINARY To D DECIMAL AND TYPE ROUTINE 


SOBLK: 
. SBTTL 


10. 
-BLKW 


BINARY 10 OCTAL (ASCII) AND TYPE 


§ SPARES ESSSESOESEEOEOOEEDOEOEEEEOEEOEEEEEOOEEEEOEOEOEOEEEEOEEEDEEEOD 

s*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
s*OCTAL (ASCII) NUMBER AND TYPE IT 

:*$TYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


;*CALL: 


NUM, -C SP) 


:;NUMBER TO BE TYPED 
:;CALL FOR TYPEOUT 
3sN*°1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
s3M*1 OR O 
ssl=TYPE LEADING ZEROS 
33:0*SUPPRESS LEADING ZEROS 


 eSTYPON- - --ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
se$TYPOS OR sTYPOC 


s@CALL: 
3¢ 
a 


NUM, -CSP) 


ssNUMBER TO BE TYPED 
ssCALL FOR TYPEQUT 


| eSTYPOC-- -ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 


s@CALL: 
8 
3@ 


18: 
2s: 


38; 


MOV 
TrYPOCc 


: 


MOVE 
MOVB 


Se 


2m 
io 
oO 


NUM, -CSP) 


aC SP), -CSP) 
1(SP), SOFILL 
(SP )+, SOMODE +1 


SOF ILL, a 


177770,R3 
4$ 


ssNUMBER TO BE TYPED 
ssCALL FOR TYPEOUT 


ssPICKUP THE MODE 

33LOAD ZERO FILL SWITCH 
ssNUMBER OF DIGITS TO TYPE 
ssADJUST RETURN ADDRESS 


ZERO FILL SWITCH 
SIxX(6) DIGITS 
ITERATION COUNT 


33GET THE NUMBER OF DIGITS TC TYPE 


ssSUBTRACT IT FOR MAX. ALLOWED 
33:SAVE IT FOR USE 

3sGET THE ZERO FILL SWITCH 
ssPICKUP THE INPUT NUMBER 
ssCLEAR THE OUTPUT WORD 
s;ROTATE MSB INTO “C” 

33GO DO SB 

s3FORM THIS DIGIT 


33GET LSB OF THIS DIGIT 
ssTYPE THIS DIGIT? 

33B8R IF NO 

33GET RID OF JUNK 
s3sTEST FOR O 


SEQ 9066 


KBSTIA. HAE” os aba ths PHC R952? «04 APR 8410558, PAGE OZ or1) AND TYPE 


012210 
012216 


012310 
012314 


11774€ 
042716 


000002 


000176 
177272 
177266 
177600 
000007 
000514 
012735 
012742 
165706 


012753 


177210 


177204 
177600 


166650 


4$: 
5$: 


7$: 


63: 


83: 
sOCNT: 


SOFILL: 
$OMODE : 
. SBTTL 


TST 
BE 


C6 


2(SP), -4¢SP) 


. WORD 
TTY INPUT ROUTINE 


§ SPSSSSSHSHSHSSASSSSESHSEHSHEHASEHHEAEEHHEAEEEEHEEEHEEEEEOOHEEDEDEEEESE 


33S'PRESS THIS 0? 
33GR IF YES 
3s00N‘T SUPPRESS ANYMORE 0'S 

, MAKE THIS DIGIT ASCII 

33MAKE ASCII IF NOT ALREADY 
33:SAVE FOR TYPING 

3:GO TYPE THIS DIGIT 

3:COUNT BY 1 

:3:8R IF MORE TO DO 

;;8R IF DONE 

3s INSURE LAST DIGIT ISN'T A BLANK 
:3:GO DO THE LAST DIGIT 

s sRESTORE RS 

ssRESTORE R4 

3; sRESTORE R3 

33SET THE STACK FOR RETURNING 


3 sRE TURN 

:sSTORAGE FOR ASCII DIGIT 

:s TERMINATOR FOR TYPE ROUTINE 
s;O0CTAL DIGIT COUNTER 

3sZERO FILL SWITCH 

3s sNUMBER OF DIGITS TO TYPE 


OTE GUE TEAT GEGRATOR Clee te etn nteneneencenses 
3*SOFTWARE SWITCH REGISTER CHANGE ROUTI 

s*ROUTINE IS ENTERED FROM THE TRAP HANDLER 

s¢SERVICE THE TEST FOR CHANGE 


T 
SGTSWR: 


198: 
78: 


158 

astKs 

158 
@tC177,(SP) 
@7,(SP)- 
153 

15% 


» SCNTILG 
» SMSUR 
SWREG, -( SP) 


AND WILL 
IN SOF TWARE SWITCH REGISTER TRAP CALL 
s@WHEN OPERATING IN TTY FLAG MODE. 
sCKSWR: CMP @SWRE 


33IS THE SOFT-SWR SELECTED? 
3 ;8RANCH IF NO 


33STRIP-OFF THE ASCII 

33IS IT A CONTROL G? 

33NO, RETURN TO USER 

:sARE WE RUNNING IN AUTO-MODE ? 
3:BRANCH IF YES 


3sECHO THE CONTROL-G ('tG) 

33: TYPE CURRENT CONTENTS 

::SAVE SWREG FOR TYPEOUT 

33GO TYPE--OCTAL ASCIICALL DIGITS) 
1:PROMPT FOR NEW SWR 

s:CLEAR COUNTER 

33 THE NEW SWR 

33CHAR THERE? 

331° NOT TRY AGAIN 


33PICK UP CHAR 
;iMAKE IY 7-B1T ASCII 


SEQ 9067 


D6 


KDJLIA.MAC O38 ABR *Ag*PTS4E92? 4 APRIGS APE FER OL Pe © 


012470 


012472 
012474 


012532 


000025 
012750 
000006 


000002 
177776 
011532 


000004 
177010 


177004 
177600 
000004 


9%: 


203: 


17$: 


18$: 
.OSABL 


TYPE 
BR 
LSB 


(SP),@25 
103 
» $CNTLU 

» SP 
198 
(SP),@15 
16$ 
4(SP ) 
11$ 
2(SP ), @SWR 
06, 
» $CRLF 
SINTAG, 1 
15$ 
#100, ,asTKS 
(SP 


s3IS IT A CONTROL -vU? 
;;B8RANCH IF NOT 
33YES, ECHO CONTROL -U (tU) 
ss IGNORE PREVIOUS INPUT 
s3LET’'S TRY IT AGAIN 


331S IT A <CR>? 

3 ;8RANCH IF NO 

33;YES, IS IT THE FIRST CHAR? 

3; :;BRANCH IF YES 

33SAVE NEW SWR 

3;CLEAR UP STACK 

s33ECHO <CR> AND <LF> 
;sRE-ENABLE TTY KBD INTERRUPTS? 
3 ;BRANCH IF NOT 

3sRE-ENABLE TTY KBD INTERRUPTS 
3 sRETURN 

:sECHO CHAR 

:sCHAR < 0? 

;;BRANCH IF YES 

3;;CHAR > 7? 

;:;B8RANCH IF YES 

33STRIP-OFF ASCII 

:3I1S THIS THE FIRST CHAR 

: sBRANCH IF YES 


iw 
KEEP COUNT OF CHAR 
33;SET IN NEW CHAR 
33GET THE NEXT ONE 
ssTYPE 2?<CR><LF> 
;3;SIMULATE CONTROL -U 


8 8 OSOSSOSOO44E68 0664688 08606060668 6600664468 600606020600606006060084004008 


s*THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


s®CALL: 


ROCHR 

RETURN HERE 

MOV 4(SP),2(SP) 
TST8 asTKS 

BPL i$ 

MOvVB @$TKB,4( SP) 
BIC @C<177>,4(SP) 
CMP 4(SP), 023 

BNE 3$ 


ssINPUT A SINGLE ogi FROM THE TTY 
3: ;CHARACTER IS ON THE STACK 
s3WITH PARITY BIT STRIPPED OFF 


THE PC 


;:;BRANCH IF 


SEQ 9068 


ARE AS 


GLOBAL. 
KDJ11A. MAC 


01 
012610 


012765 


176756 
176752 


012720 
012730 


000177 
011532 
000044 
012716 
000015 


177777 
011533 


000004 
012720 


2s: 


4$: 


;#CALL: 


SAUTOB: 
SINTAG: 
. SBTTL 


8922666646466 0646 6466666666606 64666606606066466666660606666066680606068086666 


s*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE 


osMAbASPNAE?? ARGH ABST abt 


TSTB 


RTI 


RDLIN pd A STRING FROM THE TTY 
RETURN HERE 
MOV R3,-(SP) 33SAVE R3 
MOV @sTTYIN,R3 33;GET ADDRESS 
CMP OSTTYIN«8. ,R3 : ;sBUFFER FULL? 
BLOS 4$ 33;8R IF YES 
ROCHR 
MOvVB (SP )+,(R3) + 3GET CHARACTE 

0177,CR3) ssIS IT A RUBOUT 

3$ :3SKIP r NOT 
TYPE "> igageeg ssTYPE A ‘'?° 
BR ;;CLEAR THE BUFFER AND LOOP 
ane (RS), 98 ;3;ECHO THE CHARACTER 
CMPB #15,(R3)- 3 ;CHECK FOR RETURN 
BNE 2s 3:LO0P IF NOT RETURN 
CLRB -1€R3) :;CLEAR RETURN (THE 15) 
TYPE sLF s3TYPE A LINE FEED 
MOV (SP)+.R3 ssRESTORE R3 
MOV CSP), -CSP) 
MOV 4(SP),2¢SP) 33 
MOV OSTTYIN, 4(SP) 
RTI 3 sRETURN 
-BYTE 9] ; sSTORAGE FOR ASCII CHAR. 
2 : 33 TERMINATOR 
eASCIZ /tU/<15><12> rac 
-ASCIZ /tG/<15><12> : sCONTROL "G" 
~ASCIZ <15><12>/SWR = / 
-ASCIZ / NEW = / 
-BYTE 0 ssAUTO MODE FLAG 
BYTE 0 ss INTERRUPT MODE FLAG 
TRAP DECODER 


E6 


BsTKS 

2$ 
#*C177,CSP) 
(SP)+,@21 
2s 


i$ 

4(SP), 0140 
43 
4(SP),@175 
&% 

040 ,4(SP ) 


;;WAIT FOR A CHARACTER 
;;LOOP UNTIL ITS THERE 
;;GET CHARACTER 

+;:MAKE IT 7-BIT ASCII 
33I1S IT A CONTROL -Q? 
s3IF NOT DISCARD IT 


33 YES, 


UME 
:3I1S IT UPPER CASE? 
; ;BRANCH IF YES 
3:IS IT A SPECIAL CHAR? 
; ;BRANCH IF YES 
s;3sMAKE IT UPPER CASE 
33GO BACK TO USER 
33 SOSSSASESSSESSESSESASEAAOAERAAEREEAHSEAESHEEEEEAAEEEEEEOEREOEEOERS 


s@THIS ROUTINE WILL INPUT A STRING FROM THE TTY 


33GO READ ONE “‘paeeaeiaas FROM THE TTY 


ssADJUST THE STACK AND PUT ADDRESS OF THE 
FIRST ASCII CHARACTER ON IT 


; sRESERVE 8 oe FOR TTY INPUT 
TROL 


“TRAP” INSTRUCTION 


SEQ 9069 


SS OF FIRST CHARACTER WILL BE ON THE STACK 
+ TERMINATOR WILL BE A BYTE OF ALL O'S 


F6 
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3450 s*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 

3451 3*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 

3452 3@GO TO THAT ROUTINE. 

3453 

3454 012766 010046 STRAP: MOV RO, -(SP) 33SAVE RO 

3455 012770 016600 000002 MOV 2(SP),RO 33GET TRAP ADDRESS 

3456 012774 005740 TST -(RO) ;s;BACKUP BY 2 

3457 012776 111000 MOVB CRO),RO 33GET RIGHT SYTE OF TRAP 

3458 013000 006300 ASL RO ::POSITION FOR INDEXING 

3459 013002 016000 013022 MOV $TRPAD(RO),RO ;;INDEX TO TABLE 

3460 013006 000200 RTS RO ;:;GO TO ROUTINE 

3461 

3462 

3463 3sTHIS IS USE TO HANDLE THE "GETPRI” MACRO 

34 

3465 013010 011646 $TRAP2: MOV (SP), -(SP) :s;MOVE THE PC DOWN 

34 013012 016666 000004 000002 MOV 4(SP),2(SP) 3s;MOVE THE PSW DOWN 

3467 013020 000002 RTI ss;RESTORE THE PSw 

3468 

3469 -.MACRO SETTRAP A,B,MSG 

3470 $$SET  A,B,\<TRAP+$TRP>,\$TRP,<MSG> 

3471 -NLIST 

3472 STRP=$TRP ol 

3473 -LIST 

3474 .ENDM  SETTRAP 

3475 -MACRO $$SET A.8.C.D.COMNT 

3476 IF EQ $TRP-1 

tk .SBTTL TRAP TABLE 

3479 :@THIS TABLE CONTAINS THE STARTING 4DDRESSES OF THE ROUTINES CALLED 

seeo 3*BY THE “TRAP” INSTRUCTION. 

3482 : ROUT INE 

BE ee Rene ee aN 3S CE Rae Laie aN Rin eee ee ae ae 

3484 $TRPAD: .WORD sTRAP2 

3485 .ENDC 

3486 .IIF NOF GNS,.NLIST 

3487 A= 

3488 LIF NOF GNS,.LIST 

3489 8 3:CALL=A TRAP +D(C) COMNT 

3490 .ENDM $8SET 

3491 ; TRMTRP 

3492 $TERM=. -$TRPAD 

3493 .ENOM  TRMTRP 

Sean .SBTTL TRAP TABLE 

3496 3*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 

a 3@BY THE “TRAP” INSTRUCTION. 

3499 ; ROUT INE 

3500 ERY ee aR 

3501 013022 013010 $STRPAD: .WORD %sTRAP2 

3502 013024 011162 $TYPE ;;CALL=TYPE TRAP +1(104401) TTY TYPEOQUT ROUTINE 

3503 013026 012006 $TyYPOC ;;CALL*TYPOC TRAP +2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 

3504 013030 011762 $TYPOS ;;CALL=TYPOS TRAP +3( 104403) TYPE OCTAL NUMBER (NO LEADING ZE?0S) 

3505 013032 012022 $TYPON ;;CALL*=TYPON TRAP +4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 


GLOBAL 


AREAS 
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011536 
012260 


012210 
012472 
012612 


112767 
112767 
000403 
112767 


000236 
000226 


165526 
000004 


$ROLIN 
-SBTTL APT COMMUNICATIONS ROUTINE 


sTYPDS 
$GTSWR 
$CKSWR 

$RDCHR 


G6 


10,58 PAGE 71 
TABLE 


3;CALL=TYPDS 
: sCALL=GTSWR 
3 ;CALL =CKSWR 


: sCALL =ROCHR 
3; sCALL=RDLIN 


TRAP +5( 104405) TYPE DECIMAL NUMBER (WITH SIGN) 
TRAP +6( 104406) GET SOFT-SWR SETTING 
TRAP+7(104407) TEST FOR CHANGE IN SOFT-SwR 


TRAP +100 104410) TTY TYPEIN CHARACTER ROUTINE 
TRAP +11(0104411) TTY TYPEIN STRING ROUTINE 


£ F PPSSOASSESSSSEESSSSSSEEESEHAAEAASLALERAEEREAEAASARASHEAREREARERESELS 


SATY1: 
SATY3: 


SATY4: 
SATYC: 


1$: 


2s: 


128; 


MOVB 
MOVB 
BR 

MOVB 


#1,$FFLG 


$1,$FFLG 
RO, -(SP) 
R1,-(SP) 
SMFLG 


S$ 
las aang 


ae 


i 
SMSGTYPE 
118 


#2 ,4( 
$ 


:;1TO REPORT FATAL ERROR 
3310 TYPE A MESSAGE 


3;TO ONLY REPORT FATAL ERROR 


:3PUSH RO ON STACK 

33;PUSH R1 ON STACK 
;:;SHOULD TYPE A MESSAGE? 
33IF NOT: BR 

1 }OPERATING _— APT? 
33IF NOT: 

+ SHOULD. SPOOL MESSAGES? 
33:IF NOT: BR 

;3GET MESSAGE ADDR. 

;;BUMP RETURN ADDR. 
33;SEE IF * BONE W/ LAST XMISSION? 
33IF NOT: WAIT 
33PUT ADDR IN MAILBOX 
33F IND END OF MESSAGE 


33SUB START OF MESSAGE 

3s3GET MESSAGE LNGTH IN WORDS 
3sPUT LENGTH IN MAILBOX 
3s;TELL APT TO TAKE MSG. 


3sPUT MSG ADDR IN JSR LINKAGE 
3 ;BUMP RETURN ADDRESS 

3 PUSH 177776 ON STACK 

3sCALL TYPE MACRO 


; s SHOULD eer “ahd FATAL ERROR? 


33;1F NOT: 

; ;RUNNING UNDER APT? 
:3IF NOT: 

:sF INISHED LAST MESSAGE? 
33IF NOT: IT 

33GET ERROR @ 


3 ;BUMP RETURN ADDR. 
33 TELL APT TO TAKE ERROR 
3sCLEAR FATAL FLAG 


:3:POP STACK INTO R1 
3:POP STACK INTO RO 
3; sRETURN 


SEQ 9071 


GLOBAL AREAS 
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013310 
013311 
013312 


013314 


000 


165532 


165516 
001002 


177414 


165356 
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0 
Oo 
e) 


SEQ 9072 


;3;MESSG. FLAG 
:;L0G FLAG 
;3:FATAL FLAG 


§ F PPSASASSOASESESESASEOEEEEEOAHASARAEASEEEDEREAEARERDDEREDREREEERE 
sTHIS ROUTINE WILL INCREMENT THE ERROR COUNT AND THEN PASS THE UNIQUE 
sERROR NUMBER TO THE APT ERROR ROUTINE TO BE REPORTED TO THE APT SYSTEM. 


SERROR: INC 
BE 


1$: 


100$: 
1028: 


SERFLG 
SERROR 
ERRCNT 
+ ala #1002 


07777, 3% 


lalate 


) 
acSP),90102$ 


0 
@2,(SP) 
-ERR1 
3$, -(SP) 


»ERR2 
101$, -(SP) 


ew 
PC, SATY4 
0 

&$ 

0 

10 


; INCREMENT ERROR FLAG 

;DON'T LET IT GO TO ZERO 

; INCREMENT THE ERROR COUNT 

3IS ERROR FROM VECTOR AREA 

;IF YES THEN 

;sREPORT AN UNEXPECTED TRAP 

;SAVE UNEXPECTED TRAP DATA 

;AND RESTORE SP 

;ELSE 

sREPORT UNIQUE ERROR NUMBER TO APT 
;SAVE ERROR PC 

:;GET OVER UNIQUE ERROR NUMBER FOR RETURN 


;TYPE ERROR MESSAGE 
yg OVER ERROR MESSAGE 


;PUSH UNIQUE ERROR NUMBER ON THE STACK 
s TYPE OCTAL ERROR NUMBER 


;PUSH ERROR PC ON THE STACK 
: TYPE THE ERROR PC 

;CHECK TO MAKE SURE WE'RE IN APT MODE 
:IF YES THEN 

:GO REPORT ERROR TO APT 

:STORAGE FOR ERROR NUMBER 

s;LOOP HERE AFTER REPORTING ERROR TO APT 
:IF NOT APT THEN HALT 

;ALLOW RECOVERY FROM HALT 


GLOBAL AREAS 
KDJ11A.MAC 


APTSIZ= 
APTSPO= 
ASWREG= 
ATESTN= 
AUNIT = 
AUSWR = 
AVECTi= 


MACY1i 30AC1052) 04-APR- 


03-APR-84 11:36 


RSRSRS 


@ 


Th hbd hth bhbte het bab 


625 
3084 


16 


USER SYMBOLS 


84 10:38 PAGE 74 
CROSS REFERENCE TABLE -- 


640 
25376 2596 2602 26136 2614 


631 


636 
637 
628 
27014 2705 


2717¢ 2768+ 


3567@ 3596 
386 1395 1406 1495 1509 
1791 1816 1894 2175 2194 2217 2234 


si 
roy 
pe 
to) 
~ 


1522 
2252 


1596 
2261 


1650 
2360 


1670 
2395 


SEG 0073 


1679 
2405 


J6 
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AVECT2= 000000 625 

BACDAT 003052 1269 12946 

BEVENT= 177546 5360 

BGNTLP 006740 2553¢@ 2607 

BITO = 000001 3570 

BITOO = 000001 3470 357 1487 1501 1514 1527 1573 1889 1964 2068 2339 2530 2696 

BITO1L = 9000002 3460 356 2342 2350 2380 2823 2904 

BITO2 = 000004 3450 355 1122 1190 1666 1695 2164 2206 2338 2737 2862 2938 

BITO3 = 000010 3440 354 1134 1196 1203 1373 1383 1402 1492 1506 1518 1581 1647 
1663 1676 1692 1788 1813 1891 2258 2357 2392 2740 2854 2925 2956 

BITO4 = 000020 3430 353 2191 2231 2249 

BITOS = 000040 3420 352 2172 2214 

BITO6 = 000100 3410 351 1786 1809 1811 1966 

BITO7 = 9000200 3406 350 1368 

BITOS = 00 3390 349 905 1828 1905 1983 2690 2794 

BITO9 = 001000 338¢ 348 1645 2523 2791 

BITi = 2 356° 

BIT1O = 002000 3370 

BIT1i1 = 000 336¢ 

BIT12 = 010000 335¢ 

BIT13 = 020000 3340 

BIT14 = 040000 333¢ 

BIT15 = 100000 332¢ 1486 1490 1500 1503 2803 2818 

BIT2 = 000004 355¢ 

BITS = 000010 35490 

BIT4 = 000020 353¢ 

BITS = 000040 352¢ 

BIT6 = 000100 351¢ 

BIT7 = 000200 350¢ 

BITS = 3496 

BIT9 = 001000 3480 

BOARDT = 1 1¢ 587 693 730 

BPTVEC= 14 3640 

BYPARR 003374 1367 1425¢ 

CACHET= seeee0 anal ate 244 587 672 696 709 715 730 751 952 954 969 

CCR = 177746 5300 905 9102 9664 10026 10526 10536 1054 1056 1070 10726 11220 11256 
1134¢ 1142 11906 11936 1368¢ 1418¢ 1579 16454 1704 17836 1786 1809 18lle 
18284 18874 18869¢ 19056 19666 1968¢ 19836 2072¢ 2074s 20896 2164¢ 2167¢ 2206 
2209 23422 23502 23802 2414e 253i1¢ 26186 2699% 28232 2904 2994s 

CKSWR = 104407 35108 

COUNT 001040 6590 

CPEREG= 177766 5330 904 « 1007 11456 1211¢ 1289¢ 1420¢ 1529 1603 1706 18326 1908¢ 19856 
2094e 2268% 2418s le 2777e 

CPUTST= 000001 1¢ 244 587 690 730 968 0 

CR = 000015 272¢ 709 715 726 730 732 735 3040 3049 3140 3152 

CRLF = 000 2730 3152 

CTST10 003676 1535¢ 

CTSTil 004 

CYSTi2 004374 1711¢ 

CTST13 004716 1846¢ 

CTsTtiS 005072 19219 

CTSsti? 005316 20134 

CTst2 002312 1022¢ 

CTSTt20 005 21010 

CTST21 006146 22750 


GLOBAL 
KD 


ARE AS 


J11A.MAC 


CTst22 


000104 


ARR 
FPPTST= 000001 


FPVEC = 000244 


MACY11 30A( 1052) 
O3-APR-84 11:36 


0:38 PAGE 
FERENC 


29526 


2562 


2840 


2954 


2578 


2901 


696 


Ko 


2586 


2912 


697 


76 
E TABLE -- USER SYMBOLS 


2591¢ 


730 


27184 


2 
28740 


751 


27624 


2922¢ 
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FSTADD 001100 6770 2546+ 2549e 2551 2592 

FWOSEG 001066 672¢ 25364 2544 2594 2608 26106 26126 

GNS = 00060 572 3502 3503 3504 3505 3506 3508 3510 3511 3512 

GOODAD 001110 681¢ 

GTSWR = 104406 961 35080 

HITMIS= 177752 5320@ 10046 1196 1203 1298 1373 1383 1402 1492 1506 1518 1581 1647 
1656 1676 1685 1788 1813 1891 2172 2191 2214 2231 2249 2258 2357 
2392 2720 2844 2854 2868 2916 2925 2937 

HMPARR 002702 1187 1216¢ 

HT = 000011 270e@ 3092 3150 

HYBRID= OOCOO01 1¢ 549 684 691 872 952 1008 1146 1212 1281 1290 1375 1385 
1394 1405 1421 1494 1508 1521 1530 1595 1604 1649 1669 1678 1698 
1707 1790 1815 1833 1893 1909 1986 2095 2174 2193 2216 2233 2251 
2260 2269 2359 2394 2404 2419 2622 2745 2754 2778 3012 3028 3040 
3054 3305 3513 

INITMM 001412 767¢ 1484 1569 1959 2336 2526 2694 2802 

INTERR 005244 1971 1990¢ 

INTRPC 005166 19734 1998 

IOTVEC= 000020 365¢ 949 950¢ 

KOP * 172360 508¢ 

KDPAR1= 172362 509¢ 

KDPAR2= 172364 510¢ 

KDPARS= 172366 511¢ 

KDPAR4= 172370 512¢ 

KDPARS= 172372 513¢ 

KDPAR6= 172374 514¢ 

KDPAR7= 172376 515¢ 

KDPDRO= 172320 4864 

KDPDRi= 172322 487¢@ 

KOPDR2= 172324 488¢ 

KDOPORS= 172226 489¢ 

KDPDR4= 172330 490¢ 

KDPORS= 172332 491¢ 

KOPDR6= 172334 4920 

KDPOR7= 172336 4930 

KIPARO= 172340 4970 

KIPAR1= 172342 498% 

KIPAR2= 172344 4996 

KIPARS= 172346 500¢ 

KIPAR4= 172350 501¢@  2805« 

KIPARS= 172352 5020 2838 28426 29114 2914s 

KIPAR6= 172354 503¢ 1570¢ 1961¢  2066¢ 2337s 25294 26984 2704s 27136 2767s 28174 28996 29036 

KIPAR7= 172356 504¢e 

KIPDRO= 172300 475@ 14864 1490¢ 1500¢ 1503¢ 28184 

KIPORI= 172302 4760 

KIPDR2= 172304 477e 

KIPORS= 172306 4780 

KIPDOR4= 172310 479@ 

KIPORS= 172312 4809 28034 

KIPORG= 172314 4819 

KIPOR7= 172316 4820 

LDPARS 001554 768 770 772 774 776 778 812¢ 

LDPORS 001604 780 782 784 786 788 790 841° 

LF = 000012 27190 709 715 726 730 732 735 3040 3049 3144 3152 

LOOPIN 001060 66890 1263¢ 1266 1278 26974 #£=2771s 

a 001106 680% 26936 2700 2711 27704 
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001102 
= 000001 
MMVEC = 000250 
= 177744 


PRO = 000000 
PR1 = 000040 
PR2 = 000100 
PRS * 000140 
PR4 = 000200 
PRS = 000240 
PR6 = 000 

PR7 = 000340 
PS = 177776 


25474 
244 


2550¢ 
587 


1003¢ 
18035 


2013 


3001 


2367 


2574 
687 


10064 
1822 


1483 


2401¢ 


709 730 751 952 954 968 3040 
11444 1210 12884 14196 1528 1602 1705¢ 
1831¢ 1886 1907 1969+ 1984 2004 2093 


2349 2539 2715 


2402 


3305 


17756 
2267+ 


SEQ 0077 


1776 
24174 
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SIPARO= 172240 4530 

SIPAR1L= 172242 4540 

SIPAR2= 172244 4550 

SIPAR3= 172246 4560 

SIPAR4= 172250 4570 

SIPARS= 172252 4580 

SIPAR6= 172254 4596 

SIPAR7= 172256 4606 

SIPDRO= 172200 4310 

SIPOR1= 172202 4320 

SIPOR2= 172204 43390 

SIPDR3= 17 4340 

SIPOR4= 172210 4350 

PORS= 172212 4360 

SIPOR6= 172214 4370 

SIPDR7= 172216 4360 

SKIPID 010760 3013 3015¢ 

SLOCOO 001030 653 998¢ 17736 1629 1684 1906 1970 1981 2064* 2091 2348% 2416 25386 

17 2714e 2775 2799% 2997 

SLOCO1 001032 6540 

SOFTER 001116 684¢ 898 901 1008 1146 1212 1290 1421 1530 1604# 1707* 18336 1909s 
1986 2095 2269% 24198 26228 27786 

SOFTRE 001120 6850 906 1281 1375¢ 1385¢ 1394# 1405 1494% 1508* 1521* 1595s 16498 1669s 
1678¢ 1698 1790 1815 1893 21748 21934 22166 22336 22516 22608 2359% 2394 
2404e 2745 27544 

SRO = 177572 380@ = 903 §«=— 1487* §=61489e §=61501e 15046 1514 1520¢ 1527s 1573# 1590 16018 1964 
1982 2068 2083 20924 23394 2415« 2530« 2619 26968 27748 28098 2995s 

SR1 ss =_-:177574 3810 

SR2 Ss =_:177576 3820 

SR3- = -172516 3830 4 492067¢ 2338 2695 2804s 

STACK = 001 265@ 912 

START 001716 570 576 909 

STBOT = O01 

STKLMT= 177774 2760 

SwR 001046 6620 925« 927 933 947% 959 2523 2690 2791 2794 +«®#®«#+3315 33526 

SWREG 000176 5749 8©=«._- 933 959 3315 3328 

SWO = 000001 

SWOO = 000001 3199 §=6_ 329 

SWOL = 000002 318 8=—. 3328 

SWO2 = 000004 317¢ 327 

SWO3 = 000010 3160 326 

SWwO4 = 000020 315@ 325 

SWOS = 000040 3140 8=_- 324 

SWO6 == 000100 313@ 4 §©=6_ 323 

SWO7? = 000200 3120 ©§©=. 322 

SWwO8 = 00 311@ = 321 

SWO9 = 001000 310@ 320 

SWl = 000002 3280 

SW10 = 002000 

SW11 = 004000 

SW12 = 010000 3070 

SW13 = 020000 306¢ 

SW14 = 040000 305¢ 

SWw15 = 100000 304% 

SW2 = 000004 3278 

SW3 = =~ 000010 3260 
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SW * 000020 3250 
SwS « 000040 3240 
Whe * 000100 3230 
SwW7 . 200 3220 
Sw8a . 321¢ 
Sw9 * OO1 3200 
TAGADI 010672 2824 2895 29830 
TAGAD2 010704 2908 2978 2988e 
TAGRAM= seesees U 715 953 2776 2781 2783 
T 1885 19130 
TBITVE« 000014 e 
TKVEC = 3690 
TPVEC = 3700 
TRAPVE= 000034 3680 9166 9176 
TRTIVEC= 000014 3630 
TSEND 010716 29948 
TSTADD OO01112 6826 
TSTLOC OO1122 6950 11206 1123¢ 1127 1135 11436 1188s 1191¢ 1195 
1369 1371¢ 1372 138i¢ 13826 1392 1400¢ 1401¢ 1412 
1505 1515 1643 1644 1646 1655e 1658 1675 16846 
18106 1812 1888 1890 19626 1967¢ 1973 216356 21656 
2229 2246 22486 2257 
TSTLUP 006656 25416 2611 2616 
TST1 002210 9960 
TST1O 003676 1531 1567¢ 1595 
TSTil 004052 1605 1641¢ 1649 1669 1678 1698 
TSTle2 004374 1708 1771¢ 1790 1615 
TST13 004716 1834 18780 1893 
TST14 005072 1910 1957¢ 
TST1i5 005316 1987 2061¢ 
TST16 005526 2096 2161¢ 2174 2195 2216 2233 2251 2260 
TST17 006146 2270 23340 2359 2394 2404 
TSsT2 002312 1009 1049¢@ 
TST20 542 2420 2521¢ 
TST21 007274 262 26°88 2745 2754 
TST22 007720 2779 2789e 
TST3 002414 1117¢ 
TST4 2556 1147 11865¢e 
TST5 002710 1215 1260¢@ 1281 : 
TST6 003106 1291 1365¢ 1375 1385 1394 1405 
TST? 003402 1422 148190 1494 1508 1521 
TYPOS = 104405 3026 3506¢e 
TYPE = 104401 952 953 3014 3024 3027 3097 3219 3288 3326 
3373 3422 3425 3429 3502¢ 3587 3590 3593 
TYPOC = 104402 3329 35030 3592 3595 
TYPON = 104404 35050 
TYPOS = 104403 35040 
ARO= 177660 4200 
UDPARI= 177662 421¢ 
AR2= 177664 4220 
UDPARS= 177666 4230 
VOPAR4= 177670 4240 
ARS= 177672 4250 
UDPAR6= 177674 4260 
UDPAR7= 177676 4278 


UDPDRO= 177620 3980 


1202 1270 1273 
14856 14886 1491 
1687 17826 17856 
2170 2188 2207e 


3327 3330 3343 


SEQ 9079 


3354 
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VOPORI« 177622 3990 

UOPDR2* 177624 4000 

VOPDRS+« 177626 40190 

UVOPDOR4= 177630 4020 

UVDPDRS« 177632 4030 

VOPDR6* 177634 40490 

VDPDOR7= 177636 4050 

VIPARO= 177640 40°06 

VIPARi= 177642 4100 

VIPAR2= 177644 411¢ 

UIPARS= 177646 412¢ 

UIPAR4= 177650 4130 

UIPARS= 177652 4140 

UIPAR6= 177654 4156 

VIPAR7= 177656 4160 

UIPDRO= 177600 38798 

UIPDRi« 177602 3680 

VIPDR2= 177604 3890 

UIPDRS= 177606 390¢ 

VIPDR4= 177610 391¢ 

UIPORS= 177612 3920 

UIPDR6= 177614 393¢ 

UIPOR7= 177616 3940 

XBUF «= 177566 5400 

XCSR «= 177564 5390 

XxX 010732 2793 29978 

SAPT 596 602¢ 

SASTAT= eesene 3547 3562 

SATYC 013072 3518 35200 

SATY1 013046 35160 

SATYS 013054 3517¢ 

SATY4 013064 3519¢ 3598 

S$AUTOB 012764 9630 3323 34440 

SCHARC 011512 30996 31096 3116 3142 31479 
SCKSWR 012210 3315¢ 3510 

SCMTAG= seseee 912 918 920 

SCNTLG 012735 3326 34390 

SCNTLU 012730 3343 34380 

sc 001026 6400 

sCRLF 001403 735¢@ 3159 3354 3438 
sO06LK 011752 3185 3219 32270 

sDEVCT 001010 6310 

$ 011044 20 $035¢e 

sOTBL 011742 3188 32230 

SENDAD 011034 583 3031¢ 

SENDCT 011002 919 3022¢ 

SENULL 011050 3027 30380 

sENV 1020 636¢ 896 957 3077 3525 3549 3596 
sENVM 102 6376 945 3079 3084 3527 
sEoP 010746 3011¢ 

SEOPCT 010774 919 3019¢ 3023 

SERFLG 1 66490 920¢ 35 74¢ 

SERROR 013314 914 949 35740 3575 
SETABL 001020 635¢ 

SETEND 001030 608 6470 

SFATAL 001002 6280 35536 


eb OP th. AREAS 03 Apa ha PhS 42° 04 -APR Bass RePPre RPh Rie _- 


$SWREG 
STESTN 


$TKB 
sTKS 


$™N == 0000 


$TPB 
STPFLG 
sTPS 


011580 


000010 
011046 
eeeeee 
oeeeee 


001022 
001004 


011520 
011516 
23 


011524 
011531 
011522 


cc 


35196 
31560 


31520 


3547 


35566 


35640 


3555 


10798 
1612 
24240 


3278e 
30166 


D/ 


USER SYMBOLS 
3077 
1081 1157¢ 
1712¢ 1714 
2426 26270 
33040 
3017 3025 
920 921 
1119 1187 
2523 90 
1186¢ 1261¢ 
26896 2790¢ 
3336 390 
3333 3357e 
1051¢ 1079 
1375 1385 
1595 1602 
1830 1847 
2174 2193 
2424 25230 


1159 
1847¢ 
2629 


3038 


12240 
1849 


2786¢ 


1226 
19220 


1313¢ 
1924 


1315 
2014¢ 


SEQ 9081 


1433¢ 
2016 


E/ 


Gt OB AL 11 seat 052) O04-APR-84 10:38 PAGE 83 

KDJIIA.MAC OS ADR BA Sh de CROSS REFERENCE TABLE -- USER SYMBOLS =e (082 

$ TRAP 012766 916 3454¢ 

$TRAP2 013010 34650 3501 

sTRP = 000012 34940 35030 35040 3505¢ 3506¢ 3507¢ 3508 35090 3510 35110 35120 35134 

$TRPAD 013022 3459 3501¢ 

$TST™ 000210 

STSTNU= OOOOO1L 5420 

STTYIN 012720 3415 3416 3435 34372 

STYPBN= seeece 3507 

s$TYPOS 011536 31730@ 3506 

S$ TYPE 011162 3071¢ 3494 3502 3544 

$TYPEC 011374 3101 3108 3115 31200 3359 

$TYPEX 011514 3143 3145 31480 

sTYPOC 3503 

STYPON 012022 %e57 32600 3505 

$TYPOS 011762 52530 3504 

SUNIT 001012 6329 

SLNTTM 000214 6078 

SUSWR 001024 6390 

$xOFF = 000023 3125 3152 

$XON = 000021 3132 3152 

$$GET4= 30300 

SOFILL 012205 32546 32586 3268 33030 

$40CAT 5670 

. * 013502 552¢ 572¢ 1 5820 584¢e 586¢ 592 5930 595¢ 597¢ 609¢ 610¢ 
614¢@ 615¢ 6960 7370 3038 30394 30530 3150 3151 3152 3153 3154 3155 
aoe. 3157 3158 3159 3160¢ 32278 3308 3437¢ 3438 3444 3445 3446 3565¢ 

-SASTA= seesee 3517 3520 

. $x = 000204 5920 597 609 614 


GLOBAL AREAS 
KDJ11A.MAC 

A 1281¢ 
18930 
2380 
BGNS 239¢ 
BGNTST 2380 

2334 
CCHMS2 102190 
CCHMS3 1078¢ 

CCHMS4 11 

CCHMSS 12230 
CCHMS6 1311¢ 
CKLOOP 238¢ 
CMSG1 9696 
CMSG10 1535¢ 
CMSG11 16090 
CMSG12 1711¢ 
CmMSG13 1846¢ 
CMSG15 1921¢ 
CMSG17 2013¢ 
CMSG20 2101¢ 
CMSG21 2275¢ 
CMSG22 2423¢ 
CMSG23 2626¢ 
CMSG7 1432¢ 
COMMEN 372¢ 
DEF PRG 1¢ 
ENDCOM 372¢ 
ENOMOD 238¢ 
ENDPAS 3002¢ 
END 239¢ 
ENDTST 2386 

2422 
ERRDEF 2370 
RROF 23890 

1407 

1817 

2201 

2847 
ERRFOL 235¢ 
ERRFO2 2350 
ERRFOS 235¢ 
ERRFO4 235¢ 
ERRFOS 2360 
ERRF O6 236¢ 
ERRFO7 236° 
ERRF O8 2360 
ERRF OS 236¢ 
ERRF 1 227¢ 
ERRF 10 2280 
ERRF 11 2280 
ERRF i2 2280 
ERRF 13 2280 
ERRF 14 2280 
ERRF 15 228¢ 
ERRF 16 2294 
ERRF 17 2290 


MACY11 30AC1052) O04-APR-84 10:38 
O3-APR-84 11:36 


1375@ 13850 
21746 2193¢ 
967 


1405¢ 
22336 


13944 
22164 


1049 1117 1185 
2688 2789 


1260 


PAGE 85 
CROSS REFERENCE TABLE -- MACRO NAMES 


1494¢ 
22514 


15084 
22600 


1365 


F7 


1521¢ 
23590 


1595¢ 
23940 


164990 
24044 


16690 
27456 


16780 
27544 


1481 1567 1641 1771 1878 


1710 


1205 
1680 
2006 


2398 


16984 


1957 


1790 


2061 


SEQ 0083 


1815¢ 


2161 


GLOBAL AREAS ¥11 30A(1052) 04-APR-84 10:38 PAGE 86 

KDJ11A.MAC 03-APR-84 11: CROSS REFERENCE TABLE -- MACRO NAMES SEQ 0064 
ERRF18 2299 1649 

ERRF19 2290 1668 

ERRF 2 2270 «1 


H7 


GLOBAL AREAS MACY11 30AC1052) 04-APR- 10;38 P 87 

KDJL1A. HAC 03 APR Ba 11:36 cRoss REFERENCE. TABLE -- MACRO NAMES a 
ERRF 8 2280 2 

ERRF9 2260 1375 

ERROR 266° 867 1013 1060 1066 1130 1138 1151 1198 1205 1217 1283 1377 1387 1396 


1407 1414 1426 1496 1510 1523 1597 1651 1671 1680 1700 1778 1792 1798 1805 
1817 1824 1836 1895 1901 1914 1977 1992 2000 2006 2078 2084 2176 2183 2195 
2201 <s2 2224 sy 2241 2253 2262 2363 2369 2398 2406 2558 2570 2749 2758 


ETXTS2 225% 2153 


GLOBAL AREAS 
KDJLLIA.MAC 
ETxXTS3 2250 
ETXTS4 225¢ 
ETxTSS 225¢ 
ETXTS6 225¢ 
ETxTS7 2250 
ETxTS8 2269 
ETXxTS59 2260 
ETXT6 219¢ 
ETXT60 226° 
ETXT61 2268 
ETXT62 226° 
ETXT?7 2190 
ETxTsS 219¢ 
ETxT9 219¢ 
EXITST 2360 
2620 
FRONT 1¢ 
FRONT1 1° 
GE TPRI 372¢ 
GE TSWR 3720 
IOMSG 3002¢ 
MULT 372¢ 
NEWTST 237¢ 
2101 
POP 372¢ 
PUSH 372¢ 
REPOPT 372¢ 
SCOPE 267¢ 
SETPRI 3720 
SETTRA 34690 
TUP 2378 
SF TERR 236¢ 
1815 
SKIP 372¢ 
SLASH 372¢ 
SPACE 372¢ 
STARS 372¢ 
1157 
1610 
2102 
3056 
SWRSU 372¢ 
TAIL 1¢ 
TRMTRP 3491¢ 
TYPBIN 3720 
TYPODEC 372¢ 
TYPNAM 372¢e 
TYPNUM 372¢ 
TvyPocsS 372¢ 
TrPOCcT 372¢e 
TYPTXT 3720 
$sESCA 372¢ 
ss TER 12819 
18930 
$ SNEWT 372¢ 
2276 


2157 


1144 


MACY11 30A(1052) 04-APR 
035-APR -84 11:36 


1209 


13946 
22160 
1079 
2786 


-84 10:38 
CROSS REFERE 
1287 1419 
1078 1156 
2785 
3543 
3505 3506 
1394 1405 
2216 2233 
598 624 
1226 1259 
1714 1770 
2278 2333 
3310 3378 
140590 14944 
22330 22519 
1157 1224 


1528 


1223 


1508¢ 
22606 
1313 


1/7 


1602 


1312 


1521¢ 
2359¢ 
1435 


PAGE 88 
NCE TABLE -- MACRO NAMES 


1705 


1432 


1595¢ 
23946 
1536 


1830 


1535 


164990 
24046 
1610 


1907 


1609 


16694 
2745¢ 


1712 


1984 


1711 


1678¢@ 
2754¢ 


1847 


20953 


1846 


16989 


1922 


2266 


1921 


1698 


1790? 


e014 


SEQ 9086 


241? 


2013 


1790 


18i5¢ 


GLOBAL AREAS 
KDJL1A.MAC 03-APR 
$$SET 3475¢ 
$$SETM 93790 
$sSKIP 3720 
-EQUAT 2370 

HE ADE 2390 
TU 2370 
. SETUP 2390 
. S$ACTL 2390 
. $APTB 2370 
. $SAPTH 2390 
. SAPTY 24084 
sEOP 2370 
sERRO 2400 
. SREAD 2406 
s$TRAP 2390 
$TYPD 238¢ 
STYPE 238¢ 
sTYPO 240¢ 
$40CA 2379 
- ABS. 013502 


ERRORS DETECTED: 


CZKDMB/EN: ABS ,CZKDMB .. SEQ/DOC/SOL /CRF /NL : TOC =SYSMAC. SML /ML .CZKDOMB ..MAC/ML ,.KDULIA.MAC 
RUN - TIME ; 
RUN-TIME RATIO: 1286/864-=1.4 
CORE USED: 


DOCUMENT PAGES: 


0 


87 


3503 


748 109 5 SECONDS 
S8K (115 PAGES) 


3504 


MACY11 30A( 1052) 04-APR-84 
-84 11:36 


38 


J/ 


10: PAGE 89 
CROSS REFERENCE TABLE -- MACRO NAMES 


3505 


3506 


3508 


3510 


3511 


3512 


SEQ 9087 


